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Sirva-se. 



O importante, numa loja de informatics 

e o numero de opcoes que ela oferece. 

E a equipe tecnica de que dispoe, 

para uma orientacao segura 

na escolha do equipamento e do programa 

mats adequados ao seu caso 

pessoal, ou ao de sua Empresa. 

Por isso a Computerland 

e importante para 

sua decisao. 
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Campinas ■ Au. Barao de llapura. 9 1 7 
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Cenlro Empresarial Rio 

Tel. (02 1)55 1-8942 

Abertas ati as 22 horas 
Estaclonamento Prdprio 
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Antonio Costa. 
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• Estavamos um dia conversando, 
aqui na redacao, sobre jogos de esti- 
lo Adventures'. Particularmente eles 
me deixam algo angustiada, porkm 
conhego pessoas literalmente vicia- 
das nesse passatempo. 

Mesmo considerando-se a agonia 
de nao conseguir achar uma saida 
para suas.situagoes embaragosas, es- 
se tipo de jogo e\ sem diivida, tasci- 
nante enquanto exercicio mental. Pri- 
meiramente porque a maioria deles, 
apesar da ausSncia de movimento ou 
outros recursos ma is sofisticados de 
animacao, permite que o jogador efe- 
tivamente se "sinta" vivendo a situa- 
gao proposta. Assim, longas tardes 
de domingo podem transformar-se em 
aventuras envolventes, e ao jogador e 
transferida a responsabilidade de en- 
contrar saidas para um castelo mal 
assombrado ou um asilo de loucos. 

Um outro desafio trazido por esses 
jogos, sob o ponto de vista de um 
exercicio do raciocinio, e justamente 
o "achar a saida". O que acontece e 
que, por maior que seja nossa abstra- 
cao, serb sempre diffcil para o joga- 
dor vivenciar a situagao atrav6s de 



sentidos indiretos. Nao 6 vocd quern 
ve~, pega os objetos ou executa as 
agoes. VocS somente comanda a mk- 
quina; e isto pode distancid-lo de sai- 
das que, embora sejam na maior par- 
te das vezes dbvias, nao serao perce- 
bidas. 

Certamente os'Aoventures estimu- 
lam bastante o raciocinio. E evidente 
ainda que cada vez mais esse tipo de 
jogo torna-se popular no Brasil. E 
uma terceira evidencia: diversos des- 
ses jogos comercializados aqui sao 
em Ingle's. Outros foram traduzidos. 
• Existe ai uma questao bem clara. 
Alem de ser praticamente impossivel 
um controle rigido sobre a comercia- 
lizagao desse software (de lazer, 
(re)produzido em quantidade), a exe- 
cugao desse tipo de controle tornaria 
sem efeito a principal vantagem ad- 
vinda do fato de termos aqui produ- 
tos nacionais compativeis com equi- 
pamentos estrangeiros: quantidade e 
qualidade de software. 

Por6m, a tradugao de um jogo de 
Adventure envolve mais do que uma 
mere troca de palavras. Alem dos pro- 
blemas trazidos pelas diferentes es- 



truturas das linguas, as prdprias si- 
tuagoes poderiam ser melhor "encai- 
xadas" dentro do nosso contexto. 

Assim surgiu a ideia de encomen- 
darmos um 'Adventure Tupiniquim' , o 
Aventuras na Selva, que publicamos 
neste numero, para rodar em equipa- 
mentos da linha Sinclair. 
• Para esses leitores ainda, MS publi- 
ca um monitor Assembler que, espe- 
ramos, j& vai dar para quebrar o ga- 
Iho. O pessoal que trabalha com a li- 
nha TRS-80 pode, de posse do corn- 
pi lador Forth apresentado em MS n.° 
22, aprender mais sobre esta lin- 
guagem. 

E MS apresenta tambem dois equi- 
pamentos rec6m-langados que sao 
compativeis com o TRS Color Com- 
puter, utilizando o processador 6809, 
da Motorola, tambSm enfocado com 
precisao neste numero. 
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Agora e so apertar 
o botao! 





kit de sistemas 
Thais acessivel do mercado! 

PREQO AO CONSUMIDOR TABELADO PARA TODO O PA(S - Cr$ 150.000,00 

O KITSIS 6 composto de 5 sistemas, gravados em 
disketes, compatfveis com a linha Apple: 

— Contabilidade 

— Controle de estoque 

— Contas a pagar 

— Contas a receber 

— Mala direta/ Agenda 

Personal izamos sistemas para a necessidade 
especif ica de cada empresa. 

ACOMPANHA PASTA ARQUIVO COM MANUAL DE INSTRUQOES. 



Cerca de 200 jogos, 
ja inclufdos nos disquetes. 



Venda somente para revendedores. 

Cadastre sua loja, para receber catalogo e visita 
do representante, pelo tone: (0512) 22.9782 
ou envie o cupom de cadastro para 
KITSIS — Rua Mostardeiro, 291 -conj. 404 
Porto Alegre - RS 
CEP 90.000 



A partir de setembro, estaremos trabalhando 

tambem, com sistemas 

compatlveis com a linha TRS-80. 




CUPOM PARA CADASTRO 



NOME DA LOJA 



ENDEREQO 



TELEFONE 



CEP 



CIDADE 



ESTADO. 



' 




O sorteado deste m6s, que recebera 
gratuitamente uma assinatura de um 
ano de MICRO SISTEMAS, 6 Cicero 
A. de T. V. Jr., de Sao Paulo. 



NOVOSMODELOS 



Penso em adquirir um DGT-100 e 
recorro a esta genial revista para escla- 
recer algumas duvidas: 

a) Existe alguma diferenca — em hard- 
ware ou software - entre os primeiros 
modelos e os atuais DGTs? Se existe. 
qual? Em que afetam ao sistema? 

b) £ verdade a existencia de interface 
para alta resolucao gra"fica e cores? Se 
e verdade, qual o preco? Onde conse- 
gui'-la? 

c) Existe assistencia tdcnica para o 
DGT em Sao Paulo? 

Alexandre Nadalutti 

S3o Bernardo do Campo - SP 

Remetemos as suas perguntas para a 
Digitus, Alexandre, que nos respon- 
deu: "A diferenca que existe entre os 
pequenos modelos e os atuais 6 a cok>- 
cacao interna do circuito 500 e a gra- 
vacao das EPROMs, para funcionamen- 
to do mesmo. 

A interface para alta resolucao gr3- 
fica e cores esta em fase de lancamen- 
to; e a assistencia tecnica autorizada 
em Sao Paulo 6 na M. S. Industria Ele- 
tronica, Rua Dr. Astolfo Araujo, 521, 
tel. (011) 549-9223 e 549-9022". 
Digitus Ind. Com. e Serv. de Eletrdnica 
Ltd a. 
Belo Horizonte — MG 



APELO 



Mando-lhes esta para que seja pu- 
blicado meu apelo aos fabricantes de 
terminals de digitacSo, consoles, m£- 
quinas de escrever el^tricas, calcula- 
doras de escrit6rio, maquinas de somar 
e demais tipos de maquinas com te- 
clado e que tenham sistema de alarme 
sonoro (audi'vel). 

Acontece que aqui em Campinas 
existem muitas instituicoes que lidam 
com deficientes f isicos e dentre eles, a 
maioria 6" de deficientes visuais e audi- 
ti'veis. Eu colaboro como posso dando 
curso de digitacao para alguns deficien- 



tes auditivos, inclusive o primeiro que 
treinei foi uma moca que hoje ensina a 
outros como ela, e que se destaca co- 
mo a melhor digitadora num quadro 
de 40 na empresa em que trabalha. 

Notei que os deficientes fi'sicos se 
dao muito bem com este tipo de ser 
vico por depender de certa dose de 
concentracao e atencao, o quejhes 6 
peculiar devido a falta de audicao que 
Ihes impede a perda de atencao provo- 
cada por barulho. 

Contudo, ocorre tamb^m que ne- 
cessitam muito olhar va>ias vezes para 
o visor ou papel da m^quina para que 
vejam se nao erraram nada, pois nao 
ouvem o alarme sonoro dos erros. 

Assim, peco encarecidamente aos 
fabricantes destes equipamentos que 
adaptem ds suas maquinas um siste- 
ma de alarme visual. 

Por exemplo, seria muito simples 
adaptarem na mesma ligacao do alarme 
sonoro, um alarme visual que tivesse 
uma pequena luz no canto inferior 
esquerdo das maquinas de escrever 
eletricas, consoles etc. Nao alteram 
em quase nada o custo dos equipamen- 
tos, mas ser3 de grande ajuda para os 
que precisam "ouvir com os olhos". 

Queria tamWm agradecer a Itautec 
por ter criado um terminal em Braile 
para programadores cegos. 
Ci'cero A. deT.V. Jr. 
Campinas - SP 



MSAGRADECE 



Somos um pequeno grupo de mi- 
crofanSticos que tern acompanhado o 
infcio e o desenvolvimento da MICRO 
SISTEMAS desde seus primeiros nu- 
meros. Queremos parabenizar toda a 
equipe que tao brilhantemente tern 
nos brindado todos os meses com arti- 
gos interessantes e esclarecedores, num 
esforco pioneiro diante do incipiente 
campo da microinforma'tica no Brasil. 
Marco Natali 
Sao Paulo - SP 

Sou leitor de MICRO SISTEMAS 
desde o numero 1 1 , e gostaria de para- 
beniza-los pelo excelente trabalho que 
realizam, prestando grande ajuda aos 
usua>ios de microcomputadores e cal- 
culadoras programaveis. 
Carlos Alejandro G. Cardenas 
Rio de Janeiro — RJ 

So fiquei sabendo da existencia da 
revista no comeco do mes de marco, 
atrav^s de meus colegas, mas inicial- 
mente nSo me interessei muito pela 
revista. Mais tarde comecei a ter inte- 
resse por ela, mas apenas pelos progra- 



mas que serviam para a HP-41CV, pois 
tenho uma. 

Mas agora a revista tern me prestado 
grande ajuda em meus estudos, princi- 
palmente na edicao de abril, com o ar- 
tigo "As Linguagensde Programacao". 
Daqui em diante pretendo coleciona'-la 
e, na medida do possi'vel, obter os nii- 
meros atrasados. 

Espero que continuem com este 
maravilhoso trabalho desenvolvido por 
esta equipe que faz de MICRO SISTE- 
MAS uma revista de alto ni'vel. 
Domingues Jimenez Bellini 
Sao Paulo - SP 



USUARIO DO NE-Z800C 



ParaWns por sua revista, cuja nota- 
vel evolucao e destacada atencao para 
com os leitores a tern distingiiido e 
abrilhantado no mercado de revistas 
dirigidas. 

Possuidor de um micro NE-Z8000, 
da Prologica, tenho constatado, com al- 
gum pesar, que a empresa nao mais 
vem destinando a mesma atencao a es- 
te item de sua linha. Diria mesmo que 
ele foi abandonado pelo fabricante. 

Penso que outros possuidores, assim 
como eu, viriam a sentir-se gratificados 
se a empresa aoeitasse (como parte do 
pagamento) os micros, avaliados de 
forma justa, na compra de outros com- 
putadores que disponham de mais re- 
cursos. 

Tendo confianca na prestigiada ima- 
gem que a empresa tern demonstrado 
zelo em manter, julgo mesmo que ela 
ja esteja a pensar em algo semelhante. 
Se assim for, restar-me-i comunicar, 
com satisfacSo, a noti'cia a amigos 
tambe^m possuidores do NE-Z8000. 
Jose" Luis Neves 
S3o Paulo - SP 

Agradecemos os elogios, Jose Luis. 
Mandamos as suas indagacoes para a 
Prologica, que nos enviou a seguinte 
resposta: 

"Inicialmente queremos salientar 
que o produto (NE-Z8000) foi oficial 
mente retirado de linha, motivo pelo 
qual a empresa nao aplica mais recurso 
em promocao e propaganda. 

Todavia nossa rede de assistencia 
tecnica continua operando normal- 
mente, com estoques regulares de pe- 
cas e componentes, no sentido de nao 
desamparar os clientes de produtos 
que saem da linha. 

Quanto a possibilidade de a Prok) 
gica aceitar um micro usado como 
parte de pagamento na compra de um 
modelo mais recente, esta* fora de co- 
gitacao, pois a Prologica nao comercia- 
liza diretamente computadores pes- 
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joais Conta, isto sim, com uma ampla 
estrutura de distribuicSo via lojas es- 
pecializadas, magazines e outros meios 
de distribuicao. 

Temos a intencao de fomentar jun- 
to aos revendedores a kteia de compra 
de produtos usados como parte de pa 
gamento na aquisicao de produtos no 
vos. Todavia a nossa participacao 6 in 
direta e a decisao final f icara por conta 
da rede de revenda. Somos pois parti 
danos da ideia, mas nao de operacio 
naliz£-la atrav£sda Prologica. 

Posso adiantar tamb£m que temos 
pianos de la near uma "Revista do Pro- 
pnetario", com o objetivo especi'f ico 
de levar solucoes a todos os tipos de 
problemas (software aplicativo, troca 
de correspondencia etc.), inclusive este. 
J. P. Bittencourt 
Gerente de Marketing da Prologica 



SUGESTOES 



Gostaria de sugenr que quando MS 
apresentasse programas, editasse tam- 
b£m seus diagramas de bioco e fluxo- 
gramas, pois na minha opiniao ajudaria 
aos novos programadores que n§o do- 
minam muito o BASIC. 
Antonio Marcelo Otaviano 
Sao Bernardo do Campo — SP 



Muito interessante as explicacdes 
dadas pelo companheiro Rudolf Hor- 
ner Jr. (MS n° 20) no que se refere a 
colocacao de som nos micros. Como 
estou procurando entender melhor es- 
se processo de incrementacao sonora 
em micros, gostaria de saber se e" pos- 
s I've I voces publicarem um trabalho 
similar voltado para o grupo do TRS- 
80 Modelo III, mais especificamente 
para o CP-500 da Prologica. 
Carlos Eduardo Menezes 
Cachoeiro de Itapemirim — ES 

Conheci esta revista no n9 17 (Fe- 
vereiro de 83), e ja tornei-me seu lei- 
tor assi'duo, pois nela encontro todo o 
material que preciso para atualizar- 
me neste novo mundo que 4 a Infor- 
mal ica. 

Mas, as vezes, encontro dificulda- 
des devido aos termos tecnicos de In- 
form^tica e Eletronica que desconhe- 
co. Por esta razao sugiro a publicacao 
de um Diciona'rio de Informdtica e 
Eletronica. 
Gelson T. Moreira 
Sao Paulo-SP 



Tendo observado na secao "cartas" 
de MICRO SISTEMAS, desde os seus 
primeiros numeros, a publicacao so- 



mente de cartas elogiosas a revista, e 
receiosos que a gldria possa subir-lhes 
3 cabeca, tomamos a iniciativa de en- 
viar-lhes alguns tbpicos que considera- 
mos negativos, na espera que sejam de- 
vidamente analisados: 
19 — Causou-nos estranheza a entrevis- 
ta do Sr. Tomas Kovari, no n° 15 de 
MS pelo fato de que o referido senhor 
diz claramente que o produto de sua 
empresa (Microdigital), tern o uso vol- 
tado para usua>ios incompetentes: 
"Acho que n3o adianta muito ter um 
teclado de alta velocidade porque a 
maioria do pessoal nao sabe nem bater 
a ma'quina". Perguntamos: e a minoria 
que sabe como 6 que f ica? 
29 — £ uma pena a revista gastar pa'gi- 
nas que julgamos valiosas, com progra- 
mas para "Cdlculo da a>ea de um trian- 
gulo"; "Previs3o da data de parto pro- 
v2vel para bovinos"; "Como proteger 
seu programa"; e outros que tais. 
39 — Achamos que uma revista que se 
diz voltada para "Microcomputadores", 
dedique quase que sua totalidade para 
"Calculadoresde Bolso". 
49—0 volume de publicidade inserida 
na revista entre os artigos parece-nos 
algo exagerado. 

59 — Dos programas ati hoje apresen- 
tados na revista, poucos s3o os que fo- 
gem ao entusiasmo inicial de alguns 
programadores (...). 
Getulio Zepelin e Joao Lamorata 
Sao Paulo-SP 

Conheco a MICRO SISTEMAS des- 
de a Feira de Utilidades Dom6sticas 
(realizada em 1982). Ela tern otima 
aceitacao no meio estudantil e mais 
ainda na Industria de um modo geral 
Tenho lido algumas revistas america 
nas e todas as MICRO SISTEMAS ate 
hoje publicadas, mas acho que MS de 
veria se preocupar mais com a apresen 
tacao do computador de modo a en 
globar os metodos mais usados em lin 
guagens de programacao, e dar tarn 
bem as aplicacoes dos vanos metodos, 
e ainda os sistemasde acoplamento do 
computador a m^quinas nas industrias 
de automacao e controles eletro-ele- 
tronicos. 

Poderiam tamb6m abrir uma pigina 
para a publicacao de novas ideias e pe- 
quenas adaptacoes que sao feitas nas 
industrias, como circuitos simples, 
criados pelos leitores quando se vem 
em apuros para substituir pecas que 
nao existem no Brasil. 
Jose' EI6i Gaspar 
Sao Paulo - SP 



Envie suas sugestoes para MICRO 
SISTEMAS. Elas serao anotadas em 
nossa pauta e procuraremos, na me- 
dida do possi'vel, viabiliz3-las. 
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TK-82 TK-85 
CP-200 






Comerciais, financeiros. 
cientilicos e games como: 

Formula I 

Em busca do tesouro 

Simulador de voo 

Microcalc 

Invasao cosmica 

Controle de estoque 

Las Vegas 

Viga continua 

e muitos outros 

Cartucho Atari 
Aplicativos p/CP-500. Digitus e Polimax 

Distribuicao exclusiva de programas das 
marcas MICROLINE. INFINITUS • SUPERSOFT 

PECA CATALOGO GRATIS 



D DIGITAL 
o endeteco dos microcomputadores 

Rua da Conceicao 377/383 
Fone: (0512) 24-1411 
90000 Porto Alegre - RS 





LOJA 
MICRO-KIT 

TUOO SOBRE MICROCOMPUTADOR 



Venha a nossa 
loja e fale com 
quern entende! 

CURSOS 

Basic p/adultos e criancas. com m6to- 
do prxJprio comprovadamente eficiente; 
Professoresc/mestradoem ENGENHA- 
RIA DE SISTEMAS; mais de 20 cursos 
aplicados. Turmas pequenas aulas pr^- 
ticas com MICROCOMPUTADOR. 

VENOA DE MICROCOMPUTADOR 

Unitron AP II. Digitus, TK e CP 200. 
Financiamento em at6 24 meses. 

PROGRAMAS 
Comerciais e Jogos p/ APPLE, Unitron, 
Polymax, Digitus TK e CP200. 

SUPRIMENTOS 

Disquetes, Caixa p/ Disquetes, Formu- 
la" rios Continuos etc. 

VENDA DE LIVROS E REVISTAS 

Despachamos para todo o Brasil. 



Rua Visconde de Piraja, 303 S/Loja 
210 - Teli. (021) 2678291 - 521-4638 

CEP 22410 - Rio de Janeiro 

Rua Visconde de Piraja. 365 sobreloja 

209 - Ipanema 




Enxadrista experiente, Luciano Nilo de An 
drade ja" escreveu para os jqrnais "Correio da 
Manna". "Data News" e "Ultima Hora" e pa 
ra a revista "Fatos & Fotos". Luciano 6 econo- 
mists, trabalhando no Mmist6rio da Fazenda. 
no Rio de Janeiro. As opinioes e comentinos 
de Luciano Nilo de Andrade. bem como as 
ultimas novidades do Xadrez jogado por com 
pu tad ores, estarSo sempre presentes em 
MICRO SISTEMAS. 



Xadrez no micro TK 82-C 



OTK82-C, microcomputador de 
multiples finalidades fabricado 
no Brasil, tamWm e" capaz de 

jogar Xadrez satisfatoriamente com jo- 
gadores nao exigentes, atrav£s de seus 
programas TKADREZ I e II. Alem des 
tes - comercializados pela Microdigi- 
tal (fabricante dos TKs) sob a marca 
Microsoft - vaYios programas de Xadrez 
s3o vendidos no exterior para micros 
compatfveis com o Sinclair ZX81, Co- 
moro caso do TK82-C. 

Tivemos acesso a um destes progra- 
mas aqui no Rio. £ o Micro Gen Chess, 
da software house inglesa Micro Gen. 

Aproveitando a oportunidade, fize- 
mos alguns jogos e problemas entre os 
tres programas para uma avaliacao do 
potencial deste pequeno micro enquan- 
to parceiro enxadn'stico. 

Micro Gen, alvo de publicidade 
elogiosa no folheto que o acompanha, 
mostrou-se inferior ao TKADREZ II, 
tanto no encontro individual como na 
solucao de posicoes enxadn'sticas, a 
despeito de gastar tre"s vezes mais tem- 
po e ter uma apresentacao do tabuleiro 
e das jogadas no video menos confusa 
que o programa da Microdigital. 

Veja a confirmacao disto na partida 
que apresentamos a seguir. 



Micro Gen Chess 

x 

TKADREZ II 



1 - P4R P4R; 2 - C38R C3BD; 3 - 
C3B C3B; 4 - B4B B4B; 5 - C5CR, Um 
soco no ar... 5 - ...0-0; 6 - P3D P3D; 
7 - P3TR D2R; 8 - B3R BxB; 9 - PxB 
C1R; 10 — P4TR. As brancas parecem 
estar preparando violento ataque. 10 — 
...B2D; 11 — 0-0(7). Continuacao muito 
tfmida. Incisivo seria 11 -C5D D1D; 12 
-057*! P3TR; 13-0-0-0, commobiliza- 
c3o total. As pretas n§o poderiam cap- 
turar o cavalo porque as pecas brancas 
irromperiam pela coluna da TR. 11 — 
...C3B; 12 - D1R C5CD; 13 - D1B 
B1R; 14 - P3TD C3B; 15 - R2B C5C+; 
16 — R3C. As brancas culminam uma 
se>ie de jogadas despropositadas com 
R3C. Com 16 - R2R seria possi'vel 
manter a iniciativa gracas ao jogo pas- 
si vo das pretas. 16 - ...C3B; 17 - C5D 
CxC; 18 - PxC; bloqueando o bispo. 
18 - ...C4T; 19 - D1D P4CD; 20 - B2T 
T1C; 21 -D2D C2C.22-D2B B2D; 23- 
P4C P4TD; 24 - PxP CxP; 25 - T1CD 
P4BR. Finalmente as pretas resolvem 
atacar. Merece destaque o fato delas n3o 
se impressionarem com o cavalo branco 
em 5CR. 26 - D1R TIT; 27 - D3B. Na 
lucubracao desta jogada as brancas gas- 
taram quase 11 minutos. 27 — ... B1R; 
28 - T4C T3B; 29 - T1-1C T2T; 30 - 
C6R T3C+; 31 - R3T T5C. De repente 



as brancas s3o submetidas a violento ata- 
que, que parecem subestimar. 32 — P3C 
D3B; 33 - P4D. A troca das torres era 
necessa>ia para reduzir a tensao. 33 — 
...D3C; 34 - CxPB(7?) TxPC+; 35 - 
R2T D5C; 36 - CxB DxPT mate. 

Quando os micros 
imitam Capablanca 

Jose" Raul Capablanca, ex-campeao 
mundial de Xadrez de 1921 a 1927, foi 
incontestavelmente um dos mais fortes 
jogadores de todos os tempos. 

Atualmente, numerosos micros de 
producao recente \i repetem o genial 
cubano no arremate de algumas de suas 
conhecidas e fciceis combinacoes. Veja- 
mos dois exemplos em que o Great Ga- 
me Machine, com o programa Steinitz, 
nao teve dificuldades em dar as conti- 
nuacSes corretas em poucos minutos. 
Veja tambe"m como os programas 
TKADREZ I e II e o Micro Gen Chess 
se comportaram diante dos problemas. 



J. R. Capablanca 

x 

E. Lasker 

Havana, 1921 (match) 



Depois de / min. e 41 seg., o Great 
Game Machine revelou a sequencia que 
leva a mate ou ganho de material para 
as brancas: 1 - D8C+ R2R; 2 - D5R+, 
ganhando o cavalo. 
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Veja os outros programas: 
TKADREZ II — Achou a solucao no 
n i've I 3, apos 7 m/n. e 50 seg. para 
D8C' e 45 sep. para D5R+. 
Micro Gen — No m'vel 3 achou D8B+, 
apos 5 min. e 1 1 seg.. segundo lance 
foi. entretanto, B7B+, apos 4 min. e 57 
seg.. 

TKADREZ I - No seu m'vel 3, achou 
D88+ em 6 min. e 57 seg. 

0. S. Bernstein 

x 

J. R. Capablanca 

Moscou, 4/2/1914 



Neste exemplo mais sofisticado, em 
que ambos os jogadores precisam estar 
alertas em virtude da vulnerabilidade de 
suas retaguardas, o Great Game Machine 
gastou 5 min. e 33 seg. para achar a so- 
lupao (Jogam as pretas). Vejamos os 
nossos programas: 

TKADREZ II - Achou D7C apenas no 
n i've I 4, ap6s pensar por 3min. e 16seg.. 

Micro Gen — Deu a resposta no seu n i'- 
ve! 3, depois de 10 min. e 6 seg.. 

TKADREZ I - D7C, depois de 13min. 
e 47 seg. no m'vel 3. ■ 



G.D.M. uma loja 

com 

tratamento Pessoal 



J.R. Sysdata e 

Digitus p/entrega 

imediata TK 82, 

TK 85, CP 200, 

300 e 500 

LEASING 

e credito direto 

Assistencia 

Tecnica. 

Temos programas 

prontos em fita. 



|j P P| imformAtica 



UMITADA 



R. Conde de Bonfim 346 

Lj 307 - Tijuca - RJ 

Tel. 284-8744 



& 



SOFTWARE 

O Cornbustivel do Computador 



Programas para CP 500, DGT 100, TRS 80, Dismac, Polymax e outros. 
Temos disponiveis mais de 50 programas especi'ficos, em 
fita ou diskete, para aplicacoes diversas. 



TABELA DE PRECOS - PROMOCAO ESPECIAL 


PROGRAMA 


FITA (Cr$) 


DISKETE (Cr$) 


Contabilidade 


21.120.00 


126.736.00 


Folha de Pagamento 


— 


50.688,00 


Controle de Estoque 


33.792,00 


63.360,00 


Editor de Textos 


16.896,00 


42.240,00 


Mala Oireta 


25.344,00 


63.360,00 


Arquivo de Processos 


12.672,00 


_ 


Contas Pagar/Receber 


25.344.00 


63.360,00 


Controle de Livros 


8.448,00 


_ 


Controle de Cheques 


8.448,00 


_ 


Biorritmo 


8.448,00 


12.672,00 


Decisao 


8.448,00 


12.672,00 


Histograrjia 


8.448,00 


12.672,00 


Estatfstica 


9.292,00 


13.516.00 


GrSficos 


9.292,00 


13.516,00 


Obstaculo 


9.292,00 


13.516,00 


Eq. Oiferencial 


9.292,00 


13.516,00 


Controle Saldo Bancario 


— 


42,240,00 


Crediario 


— 


63.360,00 


Multifunpao 


— 


84.480,00 




□ CURSOS DE BASIC 



D SOLICITE NOSSO 
CATALOGO OU VISITE 

NOSSO SHOW-ROOM. 



DESCONTOS PARA 
REVENDA 
□ ATENDIMENTO POR 
REEMBOLSO POSTAL 
PARATODOOBRASIL. 



Qno/ojon 



Av. Rio Branco, 45 gr. 1311 

Tel (021)263-1241 

CEP 20090 - Rio de Janeiro. 



CONTROLE DE ESTOQUE 

PARA TK-82 

NEZ 8.000, CP 200 e TK-85 

JVeco de Lancamento:Cr$ 6.800,00. 



Voce tambem encontra esses programas em nossos revendedores credenciados. 
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Um pequeno monitor Assembler — escrito em BASIC - que Ira ajuda-lo 
na en trad a de sub-rot in as e programas em linguagem de maquina. 



Um monitor Assembler 
para o TK 82-C 



Jose Carlos Niza 



s mais poderosas instructs dos 
micros compati'veis com o Sin- 
clair ZX81 (TKs 82-C e 85, 
CP-200 e NE-Z8000) sao, sem diivida 
alguma, POKE, PEEK e USR, pois per- 
mitem o acesso a linguagem de maquina 
do Z80. Porem. e em contrapartida. sao 
as menos utilizadas pela grande maiona 
dos usuanos destes micros pessoais. 

Existem algumas razoes para isso e 
entre elas esta o facil aprendizado da 
linguagem BASIC. Entretanto, sao tan- 
tas as vantagens da bnguagem de maqui- 
na (programacao de entrada/sai'da, 
transference de blocos de dados, mani- 
pulacSo e teste de bits, jumps relativos 
etc.) que todos aqueles que se aprofun- 
dam um pouco mais em programacao 
ou mesmo tentam destrinchar um pro- 
grama mais complexo, encontram roti- 
nas (muitas vezes maiores que o pro- 
pno programa BASIC) nesta bnguagem. 

Outra fonte de desesti'mulo para a 
utihzacjlo da linguagem de maquina e 
ter que introduzir tantos POKEs quan- 
tos forem necessanos. Se um programa 
nessa bnguagem tiver 100 instrucoes/' 
dados, teremos que introduzir 100 
POKEs com as respectivas bnhas. 

Existem, obviamente, vanas maneiras 
de tornar esse trabalho menos arduo e o 
programa descnto a seguir vem justa- 
mente auxihar-nos na digitacSo de roti- 
nas em linguagem de maquina. alem de 
trazer outras vantagens. Ele aceita dados 
em decimal ou hexadecimal, pergunta 



pelo endereco de entrada ou exame de 
dados e e modular, permitindo que se 
cne operates especificas. 

DESCRICAO DO PROGRAMA 

Inicialmente. voce deve digitar o pro- 
grama e guarda-lo em fita. Com esse 
procedimento. voce tern o programa pa- 
ra futuras apbcacoes e uma seguran<;a 
contra sua possi'vel perda. pois em roti- 
nas em linguagens de maquina os erros 
quase sempre causam a perda total do 
conteudo da mem6na. 

A pnmeira parte do programa e ge- 
ral e comanda a apresentacSo e o mo- 
do de operacao desejado. Os modos de 
operacao sao blocos arranjados da se- 
guinte forma: 

2000 a 2499 - Modo A 
2500 a 2999 - Modo B 
3000 a 3499 - Modo C 
3500 a 3999 - Modo D 
E assim por diante. Cada modulo des- 
tes funciona isoladamente e para equipa- 
mentos com 2 Kb de memona voce de- 
ve utilizar apenas o modulo necessano 
ao trabalho a ser feito. 

Voce pode ainda cnar outros modu- 
los. bastando alterar a bnha 1090 para a 
identificacao dos modulos.F em diante. 

OPERA<;AO 

Apos a recuperac^o da fita cassete. o 
programa apresentara os modos de ope- 
racao implementados. Existem anco 



modos de operacao, que descreveremos 
a seguir. Nesta fase. o programa espera 
que a tecla correspondente ao modo de- 
sejado seja pressionada. 

Modo A - Permite lnserir/exarrunar da- 
dos em hexadecimal. O programa per- 
gunta pelo endere<;o uncial onde sera 
feita a consulta. A seguir. o endereco e" 
impresso com seu respecuvo conteudo. 
Neste momento o sistema aguarda uma 
ttring como dado de entrada. Se tor " 
(NEW LINE) o endereco sera mcremen- 
tado e o processo repetido. Se for — e 
NEW LINE, entao o endereco sera de- 
crementado e o processo repetido. Se 
for um carater entre e F, o programa 
aceitara a mensagem como modificacdo 
de endereco, produzira a modificacjio 
no endereco, incrementara o endereco e 
repetira o processo. 

A grande vantagem dos dados em he- 
xadecimal e que eles podem serescntos 
numa frase. Assim. para entrar os dados 
podemos ter duas situacoes vahdas: 

01 NEW LINE 

FF NEW LINI 

01 NEW LINE 

C9 NEW LINE 
ou 

01FF01C9 NEW LINE 
£ importante. entretanto. naoesque- 
cer que os numeros hexadeamais pos- 
suem sempre dois di'gitos. Assim. o nii- 
mero 2 devera ser escnto 02. 



10 
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Se na entrada de dados houver um 
carater fora desses parametros, o progra- 
ma encerrara a operacao e retornara a 
pergunta MODO?. Podemos, entao.din- 
gjr a programaca"o passo a passo ou na 
propria string de entrada. Por exemplo: 

00CD640001 FF3E. 

Isto sigmficana : 

- grave 00 

- grave CD 

- grave 64 

- grave 00 

- grave 01 

- retorne tres enderecos 

- grave FF 

- grave 3E 

- encerre a entrada de dados com a 
pergunta MODO? 

Modo B - Pennite insenr/examinar da- 
dos em decimal. Esse modoe semelhan- 
te ao Modo A, porem com uma grande 
diferenca: nao € permitida a programa- 
9S0 na string de entrada. Cada dado.re- 
trocesso ou finalizacao deve ser acompa- 
nhado por um NEW LINE. 

Modo C - Executa uma rotina em lin- 
guagem de maquina. Nesse modo. o pro- 
grama executa a rotina que se micia no 
endereco informado. 

Modo D - Retoma ao BASIC, o modo 
de edicao do micro, fazendo antes uma 



listagem automatica do programa conti- 
do na memona. 

Modo E - Arquivo em fita. Copia o 
conteudo da mem6na numa fita cassete. 



PROCEDIMENTOS GERAIS 

No caso de rotinas que serao coloca- 
das no topo da memona, recomenda- 
mos reservar espaco antes de carregar o 
programa da fita. Apos o carregamento 
do programa no micro, estabeleca as h- 
nhas de comentano (REM) que recebe- 
rSo os codigos de maquina ou entSo di- 
mensione as matnzes, caso os codigos fi- 
quem na area de vanaveis. 

Comece a operacao de entrada de da- 
dos e quando tiver terminado, faca uma 
gravacao de todo o programa em fita 
(Modo E). Isso evitara aborrecimentos 
futuros. 

Teste a rotina em hnguagem de ma- 
quina e se tudo estiver correto ehmine o 
Editor e desfrute da velocidade do As- 
sembler, aproximadamente 20 vezes 
mais rapido que o BASIC. 



Jose" Carlos Niza 6 Engenheiro Eletrdnico for- 
mado pel a Faculdade Nuno Lisboa e trabalha 
com microprocessadores nas areas de manu- 
tencao, projetos e ana" Uses de sistemas na Jan- 
per Engenharia Eletrdnica Ltda.. RJ. 



Monitor Assembler para TK82-C 



COMANDO APHESENTAgAO 

1000 CLS 

1010 PRINT ,,"**** MICRO EDITOR 
ASSEMBLER ****",,,, "JOSE CARLOS 
NIZA", "MICRO SISTEMAS/1983", , , ," 
MODOS DE OPERACAO:", , , "A - INSER 
E DADOS HEXADECIMAL", "B - INSERE 
DADOS DECIMAL", "C - EXECUTA ROT 
ISA ASSEMBLER", "D - RETORNA AO B 
ASIC","E - ARQUIVA EM FITA" 
1020 GOTO 1050 
1030 SCROLL 
1040 SCROLL 
1050 SCROLL 
1060 PRINT "MODO? "j 
1070 IF INKEY$="" THEN GOTO 1070 
1080 LET U$=INKEY$ 

1090 IF U$<"A" OR U$>"E" THEN GO 
TO 1070 
1100 PRINT U$ 
1110 SCROLL 
1120 SCROLL 
1130 GOTO 1500+ (CODE US-37) *500 

MODO A 

2000 PRINT "ENDERECO?" 

2010 INPUT E 

2020 SCROLL 

2030 LET U$ = "" 

20 40 SCROLL 

2050 LET X=PEEK E 

2060 PRINT E;" ";CHR$ (INT (X/ 

16)+28):CHR$ (X-INT (X/16) *16+28 

) ; " 

2070 IF U$- M " THEN INPUT U$ 

2080 IF U$«"" THEN GOTO 2140 

2090 IF U$(l)="-" THEN GOTO 2160 

2100 IF U$<"00" OR U$>"FG" THEN 

GOTO 1030 

2110 PRINT U$( TO 2) 

2120 POKE E,CODE U$*16+CODE U$(2 

)-476 

2130 LET U$=U$(3 TO ) 



2140 LET E=E+1 

2150 GOTO 2040 

2160 PRINT U$(l) 

2170 LET E=E-1 

2180 LET U$=U$(2 TO ) 

2190 GOTO 2040 

MODO B 

2500 PRINT "ENDERECO?" 

2510 INPUT E 

2520 SCROLL 

2530 SCROLL 

2540 PRINT E;" ";PEEK E;TAB 12 

; 

2550 INPUT U$ 

2560 IF U$="" THEN GOTO 2610 

2570 IF U$="-" THEN GOTO 2630 

2580 IF U$<"0" OR U$>"255" THEN 

GOTO 1030 

2590 PRINT U$ 

2600 POKE E,VAL U$ 

2610 LET E-E+l 

2620 GOTO 2530 

2630 LET E=E-1 

2640 PRINT Uf 

2650 GOTO 2530 

MODO C 

3000 PRINT "ENDERECO?" 

3010 INPUT E 

3020 CLS 

30 30 LET X=USR E 

3040 PRINT AT 21,0; "USR ";E;"= " 

;X 

3050 GOTO 1030 

MODO D 

3500 CLS 
3510 LIST 
3520 STOP 

MODO E 

4000 CLS 

4010 SAVE "EDITOR" | 

4020 GOTO 1000 
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COMPROU 

MICRO MO CEI, 
COMPROU PREMIADO. 

O CEI - Centro Experimental de Informatica 
da Servimec, e o maior show-room de 
micros das mais famosas marcas do pais, e a 
mais completa programateca de softwares. 
Comprar micro no CEI e premio que se 
multiplica por iniimeras vantagens. 
Va computando: 

• Assessoria de especialistas na escolha do 
micro e do software adequados as suas 
necessidades. 

• Garantia de pleno funcionamento do 
equipamento, assegurada pelas 
assistencias tecnicas do fabricante 

e do CEI. 

• Livraria especializada que inclui as mais 
conceituadas revistas nacionais e 
estrangeiras. 

• Na Servimec voce faz o melhor negocio. 

• Precos e condicoes linkos no mercado para 
financiamenlo, leasing e ahiguel. 

• E um cartao especial de beneficios 
exclusivos, o Cardware. 

Tome uma decisao premiada: compre seu 
micro no CEI. 

VenhaaoCEl 
e descubra um admiravel mundo novo. 



%Hi 



■*dV Centro Experimental 
de Informatica 



^■SERVIMEC S.A. 

W rsJF=0=IVlAnC^\ E SE3=tVCCDS 
R. Correa dos Santos. 34 
Bom Retire - Fone: 222-151 1 
Estacionamento proprio 



Aos usuarios de micros tipo TRS-80, uma pequena rotina para evitar a "impressao" dos espacos em branco. 



Video-impressora, sem escalas 



Heni Sauaia 



J "I a nos deparamos com diversas rotinas capazes de co- 
mandar uma impressora a copiar os dizetes numericos 
ou alfanume'ricos mostrados no video. Anexadas a 
um programa, essas sequencias dao ao operador a opcao de 
produzir copia em papel de um resultado qualquer exposto na 
tela durante o decorrer de um processamento. 



100 


FOR 


J-15360 TO 16320 


STEP 


64 


200 


FOR 


I=J TO J+63 






300 


LPRINT CHR$(PEEK(I) ) 






400 


NEXT I: LPRINT: NEXT J 







Figun 1 

Um exemplo para videos de 64 colunas por 1 6 linhas e da- 
do na listagem da figure 1 . Uma rotina deste tipo considera o 
fato de que cada posic2o de escrita no video equivale a um en- 
dereco de memoria. Nos microcomputadores da familia TRS- 
80, hi 1024 dessas posicoes, correspondentes aos endere90s 
1 5360 a 16383. A variavel J assume, sucessivamente, o endere- 
90 de mem6ria da primeira posicao de cada linha do video e a 
variavel I vai adotando o endere90 de cada posicao de escrita 
do video. 

Em 300, a rotina faz lmpnmir o cardter cujo codigo foi 
pescado, de cada endere90, pela funcio PEEK. Ao fim de cada 
hnha de video, a impressora faz voltar o carro e avanca o papel 
(instru^o LPRINT em 400). 

£ tudo muito simples, mas ha um grande inconveniente: a 
impressora executa todos os movimentos para imprimir todas 
as series de espa90S em branco. Se uma linha estiver vazia, Id 
vai a impressora copiaMa passo a passo, do come90 ao fim - 
perda de tempo e desgaste iniitil. 

PULANDO OS ESPA£OS 

Temos aqui uma rotina (figura 2) que fara com que uma li- 
nha vazia corresponda a um simples avan90 do papel, impedin- 



1000 POR J-15360 TO 16320 STEP 64 




1010 FOR I»J+63 TO J STEP -1 




1020 IF PEEK(I)=32 THEN 1040 




1030 FOR OJ TO I: LPRINT CHR$ ( PEEK( I ) ) ; 


:NEXT C 


1040 NEXT I:LPRINT:NEXT J 





Figura 2 

do ainda que as series de espa90s em branco, ao fim das linhas 
parcialmente cheias, movimentem a impressora. Em 1010 e 
1020, cada linha de video 6 examinada do fim para o come90. 
Nao encontrando um c6digo diferente de 32 (que especifica 
o espaco em branco), passa-se ao exame do carater a esquerda, 
sem que a impressora seja acionada. 

Se a linha for vazia, chega-se ao comando LPRINT em 
1040, e a impressora simplesmente avan9a o papel. Se a linha 
for parcialmente cheia, todos os espa90s em branco a direita 
va"o sendo descontados ate" que seja encontrado um c6digo di- 
ferente de 32. A vandvel I vai assumindo, decrescentemente, os 
valores de cada po»ca"o da linha, de modo que, ao ser encon- 
trada uma letra, a varidvel I indicara sua posicao na linha do 
video. 

Nesse caso, a acao passa para a linha 1030 da rotina, que vai 
pescando, agora da esquerda para a direita, o codigo de cada 
cardter, e ao mesmo tempo acionando a impressora a copia-lo. 
Terminada a copia da posi9ao de video indicada por I, ocorre a 
volta do carro e o avan90 do papel com o comando LPRINT 
em 1040. 

A eficiencia desta rotina pode ser aumentada se as vandveis 
forem declaradas como numeros inteiros, isto 6, se forem se- 
guidas do simbolo %. Outra melhona sena compactar a rotina 
inteira em uma s6 hnha de programa, declarando o menor 
niimero de vezes a variavel ligada ao comando NEXT: 

2000 FOR J%«15360 TO 16320 STEP 64: 
FOR I%-J%+63 TO J% STEP-1: 
IF PEEK(I%)»32 THEN NEXT:PRINT: 
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NEXT ELSE FOR C%=J% TO 1%: 
LPRINT CHR$(PEEK(C%) ) ; :NEXT: 
LPRINT:NEXT J% 

Para permitir a impressao de somente um bloco de hnhas 
dentre as 16 existentes, a linha 1000, ou a que Ihe correspon- 
der, pode tornar-se: 

1000 FOR J%=15296+64*LI% TO 15296+64*LF% STEP 64 

onde LI% e LF% devem ser iguais, respectivamente, ao nvimero 
da pnmeira e da ultima linha cuja impressfo se deseja. Assim, 
para copiar, da linha 5 a 12 do video, LI% sera inicializada 
com o valor 5 e LF% com 1 2. 

Substituindo os comandos LPRINT por PRINT e copiando 
algumas hnhas do video no prbprio video, 6 possivel avaliar, 
com um cronometro, a velocidade de transcncao de que a 
rotana 6 capaz. Em um D-8000, ela da conta de cerca de 120 
caracteres por segundo, com hnhas cheias. 

O comando LPRINT (sem ponto e virgula) em 1040 produz 
a volta do carro da impressora, que devera entio avancar o 
papel automaticamente. Se isso nao ocorrer, talvez a impresso- 
ra deva ser previamente acionada por um comando que hgue 
esse automatismo. Se ainda nao for este o caso, a substituicao 
do comando LPRINT por LPRINTCHR$(138) devera resolver 
o problema. 

Esta nossa rotina. 6 claro, copia apenas caracteres alfanume- 
ncos. Para a c6pia de sinais graficos. sa"o necessanas outras 
providencias. ■ 



Heni Sauaia 4 professor do Departamento de Morfologia da Faculdade 
de Medicine de Ribeirao Preto, da Universidade de Sao Paulo, e usuirio 
pessoal de microcomputadores. 



CHEGA DE 
ESQUENTACAO 



V 



I 



Software 

pronto para ser usado. 

Programas de uso pessoal ou estritamente profissional; 

Cadastros, Banco de Dados, Locacoes, Contabilidade. Contas a Pagar 

e Receber, Editor de Texto, Conta Bancaria, Mala Direta, Visicalc, 

Controle de Estoque. 

E para o programador; Editor Assembler, Compiladores Basic e Cobol... 

... e jogos, que ninguem e de (erro. 

Todos em portugues, gravados em cassette ou diskette, com manual do 

usuanb, extremamente praticos. 

Es tamos ao seu alcance. 

Confira. Solicitando por telefone ou no revendedor de sua cidade, relagao 

de programas disporu'veis. 

rnODK micro informal i< a ltda. 
R. Augusta, 2690 2." andar - Loja 318 
Tel. (011) 852 2958 cep 01412 SP S 

monk, a -uc t^&ftj 

o software que faz voce ficar \~... - ^ -*- r 



feli/ por ter um micro. 




53 programas monk, relagao do software pronto para ser usado 

JOGOS E LAZER 
PROGRAMAS DE USO GERAL 



PROGRAMAS DE USO 
PROFISSIONAL 

• Data Manager (gerenciador banco de 
dados) • Contabilidade Geral • Cont- 
pag/l -Contas a Pagar I • Contrec/I- 
Contas a Receber I • Contpag/I I -Con- 
tas a Pagar II • Contrec/I I -Contas a 
Receber II • Mala Direta II (nova ver 
sab c/mais espaco p/End.) • TPV-Ta 
bela de Precos de Venda • Histograma 
Financeiro • Admimstracao de Esto- 
que I • Admimstracao de Estoques II 
(novo) • Visicalc (Eletronic Calcula 
tion Sheet) • SCE-Sistema Controle 
Estoque • Estoque Lojas de Roupas 



• Adbens-Cadastramento e Controle 
de Locacoes • Fatura-Faturamento e 
Cobranca de Honorarios. 

PROGRAMAS PARA USO NA 
ENGENHARIA 

• Micro HP • Viga • Portico • Cadmat 
Orcamento de Obras • Compilador 
Fortran. 

PROGRAMAS PARA USO EM 

PROGRAMACAO 

• Edtasm • Z-Bug • Debug • Renum 

• Crossref • Compilador Cobol • Bas- 
com-Basic Compiler Monk (novo) 



PROGRAMAS DE USO GERAL 

• Budget Management • Pagrec (Siste- 
ma de Contas a Pagar e Receber em Fi- 
ta) • Cadastro de Enderecos (Mailing 
List) • Data-File • Instant Files • Edi- 
tex-lll (nova versaol Novo Manual!) 

• Time Manager • Verban-ll 

PROGRAMAS DE USO PESSOAL 

• Contabilidade Domestica • Lotesp. 
Estatistica Matematica p/loteria Espor- 
tiva • Cadastro Fotograf ico • Cadastro 
de Artigos de Revista • Bioritimo c/ 
GrSfico da Afinidade • Pacote Treina 
mento em Basic (7 programas) • Lista 
de Compras 



Jornada nas Estrelas (c/som) o Game 
Pack 1 (Basic) (6 jogos) Game Pack 2 
(Basic) (7 jogos) • Elementar, Watson" 

• Penetrator (c/som) • Voyage of Val 
kyrie (c/som) • Batalha Lunar • Ro 
bot Attack (c/som de voz humana) 

• Galaxy Invasion (c/som) • Meteor 
Mission (c/som) • Cosmic Fishter (sys- 
tem c/som) • Lunar Lander (system 
c/som). 

Obs.: Todos os programas MONK sao 
fornecidos c/completo manual p/a sua 
plena utilizacao. Todos os programas 
sao apresentados opaonalmente em 
Diskettes e/ou Cassettes. 



Nesta outra relagao, voce localiza seu revendedor monk, 

ele vai por a sua disposigao: catalogo geral com pormenores de cada programa, 

demonstrates e aquele atendimento personalizado. 



AM-Manaus - PRODADOS - (092) 
234 1045 - BA-Salvador - OFICCI 
NA- (071) 248 6666 R.268 - SYS- 
PROL - (071) 247-8951 - CE-Foc- 
taleza - COMPUT - (085) 224 0544 
ABACO - (085) 2264922 - DF- 
Brasflia - CINE FOTO GB - (061) 
242-6344 - COMPUSCHOW - SCRN. 
(061) 2732128 - TELESERVICE - 
SCRN - (061) 226^)133 -SBM-SDS 
(061) 226 1523 -ES-Vit6ria - LOG 
DATA - (027) 222 581 1 - GO-Goi- 
ama ASSISTE - (062) 224 7098 - 
MA-Sab Luiz - DIGITOS - (098) 
222 6691 MG-Belo Hocizonte - 

COMPUCITY - (031) 226-6336 - 
COMPUTRONIX - (031) 225 3305 - 
BYTE SHOP - (031) 223 6947 - 



KEMITRON - (031) 225 0644 - Ml- 
NAS DIGITAL - (031) 201 7555 - 
Muriae - REGIS STUDIO - (032) 
721 1593 - Nanuque - ABASTECE 
DORA CARIOCA - (033) 621 1134 
PA-Balem - COMPUTRON - (091) 
222 5122 - BELDATA - (091) 228 
0011 - PB-Joab Pessoa - MEDUZA 

- (083) 221-6743 - PE-Recife - 
OFICCINA - (081) 326-9318 - SO 
TEMAQ - (081) 231-6796 - Pl-Te- 
rezina - MARGHUS - (086) 2224)186 

- PR-Cuntiba - COMPUSHOP / 
COMPUSTORE - (041) 232-1750 - 
COMPU-IN-SYSTEM - (041) 243- 
1731 - Cascavel - MICROLINE - 
(0452) 23 2044 - RJ-Rio de Janeiro 

- CLAPPY - (021) 253-3395 - COM 



PUTER-IN - (021) 274-2495 - ELE- 
TRODATA - (021) 288 2650 - 
KRISTIAN - (021) 252 9057 - Ml 
CROSHOW - (021) 264 5797 - Ml 
CROHOUSE - (021) 294 6248 - RN- 
Natal - ECONSULT (084) 222 3212 

- RS-Porto Alegre - ADVANCING 

- (0512) 26-1194 - DIGITAL - 
(0512) 24 1411 - INFORMATIQUE 

- (0512) 22-4189 - MICROSIS - 
(0512) 34-0660 - Caxiai do Sul - Ml 
CROSUL - (054) 222 2059 - Frede- 
rico Westphalen - ELETRODATA - 
(055) 344 1550 - Novo Hamburgo - 
MICROMEGA - (0512) 93-4721 - 
SC-Florianopolis - CASTRO 
(0482) 230491 - SE-Aracaju - Ml 
CROMUNDO - (079) 224-1310 - 



SP-Sao Paulo - COMPUSHOP - 
(011) 212 9004 - COPEC - (011) 
67-0063 - CEI-SERVIMEC - (011) 
222 1511 - DATA SOLUTION - 
(011) 813-3355 - MONK - (011) 
8522958 - Barrrtos - INTEC - 
(0173) 22 6411 - Campinas - Ml 
CROTOK - (0192) 32-3810 - Ribei- 
rao Preto - COMPUSYS - (016) 635 
1195 - CONSIMAF - (016) 625 
5924 - DECISA - (016) 625 5926 - 
MEMOCARDS - (016) 636-0586 - 
Sao Joaquim da Barra - ITUVEMAQ 
(016) 728 2472 - Sao Jos« dos Cam- 
pos - SISCOM - (0123) 23 3752 - 
Santos - RITZ - (0132) 35 1792 - 
Piracicaba - PALMA - (0194) 33 
1470. 

*1>il6IOa81 



(vocd ainda nao esta satisfeito, queixe-se a monk). 
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— Cursos de programacao com 
APOSTILA PROPRIA e AU- 
LAS PRATICAS em diversos 
MICROCOMPUT ADORES 

— Todas as principals marcas 
de MICROCOMPUTADORES 
pelo menor preco com credi- 
to direto em ate 24 MESES 

— Programas prontos ou por 
encomendas tanto de jogos 
quanto comerciais 

MICROCENTER INFORMATICA LTDA. 

Rua Conde de Bonfim, 229 - Lojas 320 e 
312 — Galeria Cinema III - Tel: 264-0143 

— Cep 20520 - Tijuca - Rio de Janeiro - RJ 



NAO FIQUE 
PARA TRAZ . . . 



Adquira um Micro e simplifi- 

que sua vida. 

Para ajuda-lo dispomos de: 

— Micro Computadores CP 
200, CP 500, Sist. 700, TK- 
82C. TK-85, AP II e MAXXI. 

— Assessoria a profissionais 
liberais e pequenas empre- 
sas. 

— O melhor curso de BASIC 
para adultos e criangas. 

— Software aplicativo em K-7 
(C.P.200 e TK 85) e diskette 
(C.P.500) da MICRO IDEIA. 

— Gravadores, Impressoras e 
Perifericos. 

— Reembolso p/ todo o Brasil. 
Garantimos o melhor preco eo 
melhor atendimento mesmo. 



MICRO IHH SI COM 
RII'RKS. I.TDA. 

>t jiilfijL R Vise de Piraja 547 S 
* 307 — Ipanema — Cep 
22 410 — Tel 294-6248 



« 



surso! 



• A Micro House esta" oferecendo cursos de 
"Imciacao ao Microcomputador e Linguagem 
BASIC", ministrados por analistas de siste- 
mas com orientacao pedagdgica. Turmas de 
criancas (9 a 12 anos). adolescentes (13 a 16 
anos) e adultos (iniciantes), pela manhS, tarde 
ou noite. Aldm dos cursos regulares, com um 
mes de duracao, a Micro House oferece cursos 
intensivos de uma semana ou aos sabados, e o 
"Advanced", para pessoal especializado, todos 
com aulas teoricas e praticas no CP-500. As 
turmas s3o limitadas em 12 alunos. Sao minis- 
trados tambem cursos especi'f icos para profis- 
sionais liberais e grupos fechados (empresa). 
A Micro House fica na Rua Visconde de Pi- 
raja, 547, Sala 307, telefone : (021 ) 294-6248. 
CEP 22410, Rio de Janeiro, RJ. 

• O Instituto de Tecnologia ORT esta pro- 
movendo regularmente cursos de formacSo de 
programadores. As turmas s3o mensais (tarde 
e noite), 12 dias de duracSo. carga horaria de 
36 horas, ao preco de Cr$ 40 mil (ate julho). 
Para frequenter os cursos e necessario ter o se- 
gundo grau completo. Inscricoes e informa- 
coes na Rua Dona Mariana, 213, Botafogo. 
Telefones: (021) 246-9423 ou 226-3192. 
RJ. 

• A SAD Sistemas de Apoio a DecisSo pro- 
movera os seguintes cursos, no mes de agosto: 
BASIC, de 08 a 26, das 19:00 as 22:OOh; 
VisiCalc Avancado. no dia 12. das 09.00 as 
1800h, e o Curso de VisiCalc. de 23 a 01 de 
setembro. Ainda no mes de setembro a SAD 
estara promovendo o Computer Camp para 
criancas, nos feriados da semana da Patria. 
Maiores informacdes a Rua Cardoso de Al- 
meida. 993, tel.: (011) 864 7799. SSo Paulo, 
SP. 

• A MICROL0GICA esta oferecendo os se- 
guintes cursos: I ntroducabao Processamento de 
Dados, BASIC, FORTRAN e COBOL. A coor- 
denacSo destes cursos e da Prof 3 Eliana Praca, 
Analista de Sistemas do Nucleo de Computa- 
cao Eletr6nica e professora do Curso de In- 
formdtica da UFRJ. A MICROLOGICA uti- 
liza para suas aulas praticas o microcomputa- 
dor SDE-42 (CP/M), atraves de esquema de 
reserva de horario (o aluno escolhe o horario 
de sua prdpria conveniencia). As aulas praticas 
sSo acompanhadas por um professor visando 
um atendimento individualizado, possibilitan- 
do assim maior aproveitamento. O Curso MI- 
CROLOGICA fica na Rua Barao de Mesquita, 
164, Tijuca, tel.: (021) 248-8984, Rio de 
Janeiro. RJ. 

• O Centro Educacional de Processamento 
de Dados esta promovendo cursos de Progra- 
macSo, com aulas tedricas e praticas para mi- 
cros (BASIC/COBOL) e para sistemas IBM 
(COBOL, Assembler, CS e JCL), alerh de cur- 
sos de AnSlise de Sistemas. O < ndereco para 
informacoes e" Rua Arthur Vjsconcelos, 4, 
Osasco, tel.: (01 1 ) 801-8768, SF. 

• A DATA RECORD - Cursos de Processa- 
mento de Dados oferece cursos de: Linguagem 
COBOL, as tercas e quintas-feiras, com dura 
cao de 1 20h. e curso de Linguagem BASIC, as 
segundas, quartas e sexta-feiras, com duracao 
de 50h. Maiores informacdes na Av. Santo 
Amaro, 5450. tel,: (011) 543-9937. Sao Pau- 
lo. SP. 

• A CETEC - Centro Tecnico e Cultural 
promovera cursos de Microprocessador Z80 
(8 bits) de 03 de setembro a 29 de outubro, 
com 36h, das 08:30 as 12:30h aossabados.e 
Microprocessador 6800 (16 bits).de 1 2 de se- 
tembro a 10 de outubro. 39h, nas segundas. 
quartas e quintas-feiras, das 19:00 as 22:00h. 
Informacfles na Rua Conselheiro Furtado, 
1 186, tel.: (01 1 ) 278-3920. Sao Paulo. SP. 



• Diversos cursos estab sendo oferecidos pe- 
la SCI - Sistemas, Computacao e Informdtica 
— , sfio eles: "Elementos para AvaliacSo, Sele- 
cSo e UtilizacSo de Micros", de 24/08a 26/08. 
no Rio de Janeiro; "Tecnicas para o Desenvol- 
vimento de Sistemas On-Line", de 23/08 a 
26/08 no Rio de Janeiro e de 29/08 a 01/09 
em Recife; "Metodologia e Tecnicas para Au- 
mento de Desempenho do Computador", de 
31/08 a 02/09, em Sao Paulo; "Informdtica 
para Usuabbs", de 01/09 a 02/09, em Porto 
Alegre; "Computacao Grafica e suas Aplica- 
cdes em CAD", de 14/09 a 16/09 em SSo 
Paulo; "Administracab e Uso da Linguagem 
APL". de 21/09 a 23/09. no Rio de Janeiro; 
"Metodologia de Andlise de Dados e Projeto 
de Banco de Dados", de 27/09 a 30/09, no 
Rio de Janeiro; "Gerenciando o Profissional 
de Processamento de Dados — O Desafio dos 
Anos 80", de 28/09 a 30/09. em Sab Paulo. 
O endereco da SCI no Rio de Janeiro e Rua 
Jardim Botanico, 653, 89 andar, tels.: (021) 
294-7438, 294-7488 ou 294-7797. Em Sao 
Paulo, a SCI fica na Avenida Paulista, 2001, 
grupo 1020, tels.: (011) 289-2196. 289- 
0099 ou 289-0079. SP. 

• A Informdtica Cursos e Sistemas inicia 
mensalmente novas turmas para os seus cur- 
sos de "BASIC", "BASIC Avancado", "Intro- 
ducab ao Processamento de Dados", "Funda- 
mentos de AnaTise e ProgramacSo", "CO- 
BOL", "FORTRAN", "Assembler" e 
"MUMPS". Todos estes cursos tern duracao 
de 5 ou 9 meses, com uma aula tedrica de 
tres horas semanais e aulas praticas a criterio 
do aluno que podera* utilizar-se de sistemas co- 
mo o Microengenho, CP-500, D-8000, Siste- 
ma 700 e outros. O endereco da Informa'tica 4 
Pea. Conde de Frontim 70. 1? andar, salas 
17/18, Jacaref, SSo Paulo, tel.: (0123) 51- 
2991 , SP. 

• A AD-DATA EducacSo e Inform^tica 
S/C Ltda. oferece regularmente Curso Basico 
de Microinformatica as pessoas que tern pouca 
ou nenhuma informacSo sobre o assunto. O 
curso estd dividido em: Modulo I - Introdu- 
c3o a Informdtica, Modulo II - ProgramacSo 
Basica para Iniciantes e Modulo III — Con- 
ceitos e Recursos de Equipamentos. A carga 
horaria e de 45 horas/aula e a taxa de inscri 
cSo e equivalente a 13 ORTN's. Maiores in- 
formacoes a Rua JoSo Ramalho, 818. Perdi- - 
zes, tel.: (011) 864-8200. SP. 

• Cursos de programacSo de computadores 
em linguagem COBOL e BASIC serSo minis- 
trados pela CPD do Brasil. no mes de agosto. 
O de COBOL, com duracao de 100h, custara 
o relativo a 22 ORTN's; e o de BASIC, com 
duracab de 16h, custard 5 ORTN's. As aulas 
serSo realizadas no SESC-Carmo. Informa- 
coes e matriculas na Av. Paulista, 807, 59 an- 
dar. tel.: (011) 285-3096. SSo Paulo. SP. 

• O Micro no Lar e nos Negbcios, e o Semi- 
nario que sera promovido pela JR de Goes Co- 
mercio e Assessoria no Rio de Janeiro, de 12 a 
16 de setembro. Constando de palestras.de- 
bates. estudos de caso, projecSo de filmes e 
slides e demonstracSo de equipamentos, o se- 
minario, de acordo com os seus organizadores, 
vai procurer desmistificar o microcomputa- 
dor, mostrando a todos os interessados, leigos 
ou nSo, manieras de obter rapidamente resul- 
tados de custo/desempenho. O local do semi- 
nark) ainda nSo foi estabelecido, mas quern 
quiser participar podera obter informacoes ou 
inscrever-se na JR de Goes, Rua Conde de 
Bonfim. 344/406. bloco I. CEP 20520, Rio de 
Janeiro - RJ. tel.: (021) 234-3945. 



• Para informar ao leitor sobre os cursos que 
estSo sendo oferecidos, a revista recolhe in- 
formacoes em dlversas instituic5es ou as rece- 
be pelo correio. Portanto, nSo nos responsabi- 
lizamos por quaisquer alteracdes posterior- 
mente efetuadas por estas instituicOes nos 
programas ou precos. 
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CURSOS 01 APIRFEICOAMINTO 



MAIS SUCESSO WVRAVOCE! 



Comece uma nova fase na sua vida profissional. 

Os CURSOS CEDM levam ate voce o mais moderno ensino 

tecnico programado e desenvolvido no Pais. 



CURSO DE ELE1RONICA DIGtTAL 
E 



mwLumimx 



Sao mais de 140 apostilas com mformacdes completas e sempre 
atualizadas Tudo sobre os mais revolucionarid CHIPS E voce 
recebe. alem de uma solida formacSo teorica, KITS elaborados 
para o seu desenvolvimento pratico. Garanta agora o seu futuro 




M «*= 



Mill 
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CEDM 20 KIT 
de Ferramentas. 
CEDM78 KIT 
Fonte de Alimentacao 
5v/1A. CEDM 35 KIT 
Placa Experimental 
CEDM 74 KIT 
de Componentes. 
CEDM 80 

MICROCOMPUTADOR 
Z80 ASSEMBLER. 



CURSO 0£ 

PROGRAMACAO EM BASK 



Este CURSO. espeaalmente programado, oferece os 
fundamentos de Lmguagem de Programaca"o que domma o universo 
dos microcomputadores. Dmamico e abrangente. ensma desde o BASIC 
basico ate o BASIC mais avancado. inclui'ndo nocoes basicas sobre 
Manipulagao de Arquivos. T^cnicas de Programacao, Ststemas de 
Processamento de Dados. Teleprocessamento. Multiprogramacao e 
Tecnicas em Lmguagem de Maquina, que proporcionam um grande 
conhectmento em toda a area de Processamento de Dados 






CURSO DE 
ELEITiONICA E AUDIO 



Metodos novos e ineditos de ensino garantem um aprendizado 
pratico muito melhor. Em cada nova licSo, apostilas ilustradas 
ensmam tudo sobre Amplificadores, Caixas Acusticas, Equalizadotes, 
Toca-discos, Sintonizadores AM'FM, Gravadores e Toca-Fitas. Capsulas 
e Fonocaptadores. Microfones, Sonorizacao. Instrumemacao de Medidas 
em Audio. Tecnicas de Gravaqao e tamb6m de ReparacSo em Audio. 




CEDM 1 • KIT de Ferramentas. CEDM 2 KIT Fonte de Alimentacao 
t 15 15/1A. CEDM 3 KIT Placa Experimental 
CEDM 4 - KIT de Componentes. CEDM 5 • KIT Preamphficador 
Estereo. CEDM 6 KIT Amphficador Estereo 40w. 



Voce mesmo pode desenvolver um ritmo proprio de estudo. A lin- 
guagem simplificada dos CURSOS CEDM permite aprendizado facil. E 
para esclarecer qualquer diivida, o CEDM coloca i sua disposicaVs uma 
equipe de professores sempre muito bem acessorada. Alem disso, voce 
recebe KITS pre parados para os seus exercfcios praticos. 

Agil, moderno e perfeitamente adequado a nossa realidade, os CUR- 
SOS CEDM por correspondencia garantem condicdes ideais para o seu 
aperfeicoamento profissional. 

[GRATIS 

Voce tambem pode ganhar um MICROCOMPUTADOR. 

Telefone (0432) 23-9674 ou coloque hoje 

mesmo no Correio o cupom CEDM. 

Em poucos dias voo§ recebe nossos catalogos de apresentacao. 



KIT CEDM 280 

BASIC Cientlfico. 

KIT CEDM 280 

BASIC S.mples. 

Gabanto de Fluxograma 

E-4. KIT CEDM SOFTWARE 

Fttas Cassete com Programas. 



jrPjM Awenida Slo Paulo. 718 Fone (0432) 23-9674. 
I_.L.LM I CAIXA POSTAL 1642 CEP 86100 - Londrina PR 
CURSO DE APERFEIQOAMENTO POR CORRESPONDENCIA 

Solicito o mais rapido possfvel Informacdes sem compromisso sobre o 

CURSO de 

Nome 

Rua 

Cidada 

Bairro CEP 

MS 




Em sua edicao numero 3, de dezembro de 1981, 

MICRO SISTEMAS publicou o programs 

Professor Corujinha — deJoneson Carneiro de 

Azevedo, para computadores D-8000 e compativeis 

— destinado a aux.il iar as criancas no processo de 

aprendizagem de operacdes matemiticas elementares. 

Agora, outro colaborador nosso, Ivo D 'Aquino Neto, 

adaptou o programa para utilizacao no TK82-C — 

com expansao de 16 K — e demais sistemas que 

seguem a linha Sinclair, tais como o TK-85, NE-Z8000, 

CP-200, Aply 300, ZX-81 e ZX-Spectrum. 



Professor Corujinha, no TK 82-C 



Ivo D' Aquino Neto 
Floriandpolis — SC 



10 REM PROFESSOR CORUJINHA 

20 REM MATEMATICA 

30 REM DESENVOLVIDO POR: 

40 REM JONESON CARNEIRO DE AZEVE 

DO 
50 REM ADAPTACAO P/ TK82-C: 
60 REM IVO D AQUINO NETO 
65 REM 

70 REM ***** MICRODADOS ***** 
75 REM 

80 REM ==== FLORIANOPOLIS === 
85 REM 

90 REM TEL.: (0482) 23-1039 
100 CLS 

104 SLOW 

105 DIM X(10) 

106 DIM H(10) 
110 PRINT TAB 2; 

RUJINHA $$" 
120 PRINT 
130 PRINT 
140 PRINT TAB 3; 

ULDADE =" 
150 PRINT 
160 PRINT 
170 PRINT TAB 3; 

A 8 ANOS" 
175 PRINT 
180 PRINT TAB 3; 

A 12 ANOS" 
185 PRINT 
190 PRINT TAB 3; 



S$ PROFESSOR CO 



= GRAU DE DIFIC 



1 - IDADE DE 5 



2 = IDADE DE 9 



IDADE DE 13 



A 15 ANOS" 
200 PRINT AT 21, 2; "<ESC0LHA SUA 

OPCAO (1, 2, 3)>" 
210 LET Y$=INKEY$ 
220 LET Y|<"1" OR Y$>"3" THEN G 

OTO 210 
230 IF VAL Y$=l THEN LET GR=9 
240 IF VAL Y$=2 THEN LET GR=20 
250 IF VAL Y$=3- THEN LET GR=50 
260 CLS 

270 PRINT TAB 4;"**** OPERACOES 
***** 

280 PRINT 
290 PRINT 
300 PRINT TAB 3; "SOMA" ; TAB 14;" 

SUB.";TAB 25;"MUL." 
310 LET P1=INT (GR*RND+1) 



320 LET P2=INT 
330 LET P3=INT 
340 LET P4=INT 
342 LET P5=INT 
345 LET P6=INT 



(P1*RND+1) 

(GR*RND+1) 

(P3*RND+1) 

((GR-5)*RND+1) 

(P5*RND+1) 



350 LET Rl=Pl+P2 
360 LET R2=P3-P4 
370 LET R3=P5*P6 
375 LET B=l 

380 LET B$=" " 

390 LETS$="? " 

400 PRINT AT 5,6-LEN (STR$ Pi); 

P1;AT 5,17-LEN (STR$ P3);P3; 

AT 5,28-LEN (STRS P5);P5 



410 PRINT AT 6,2;"+"; AT 6,6-LEN 
(STR$ P2);P2;AT 6,13;"-"; AT 
6,17-LEN (STR$ P4);P4;AT 6,2 
4;"X";AT 6,28-LEN (STR$ P6) ; 
P6 

420 PRINT AT 7,2;B$;AT 7,13;B$;A 
T 7,24;B$ 

4 30 PRINT AT 8,2; "? "; 

440 INPUT R 

445 PRINT R 

450 GOSUB 1300 

460 IF R<>R1 THEN GOTO 490 

465 GOSUB 1000 

470 GOSUB 1400 

475 LET B=l 

480 GOTO 515 

490 GOSUB 1200 

500 PRINT AT 8,2;S$ 

505 IF B<>4 THEN GOTO 430 

506 LET B=l 

510 "PRINT AT 8,3-LEN (STR$ Rl) ; 

" • " ; Rl 
515 PRINT AT 8,13;"? "; 
520 INPUT R 
525 PRINT R 
530 GOSUB 1300 
535 IF R<>R2 THEN GOTO 555 
540 GOSUB 1010 
545 GOSUB 1400 
547 LET B=l 
550 GOTO 575 
555 GOSUB 1200 



dBASE 




Stoma Retaraona) 

Para Geronciamenlo De 

BnooDaDMki 

- CPtM Awembler - 



CURSO PARA GERENCIAMENTO DE BANCO DE DADOS PARA VOCE! 

Voce pode ter urn Dominio total de seus Dados. * Criar e Gerenciar Arquivos. * Fazer todos os possf- 
veis Relat6rios e Pesquisas com base nos Arquivos. * Treinamento de 16 hs. em MICROS. Caso vo- 
ce nao tenha MICRO, o curso Ihe dara condigoes de decidir com base em fatos. 

dB MICRO - AV. PROFESSOR ALFONSO BOVERO, 218 - TEL.: 263-0711 
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560 PRINT AT 8,13;S$ 

565 IF B<>4 THEN GOTO 515 

566 LET B=l 

570 PRINT AT 8,14-LEN (STR$ R2) ; 

";R2 
575 PRINT AT 8,24;"? "; 
580 INPUT R 
585 PRINT R 
590 GOSUB 1300 
600 IF R<>R3 THEN GOTO 625 
610 GOSUB 1020 
615 GOSUB 1400 
620 GOTO 650 
625 GOSUB 1200 
630 PRINT AT 8,24;" " 

635 IF B<>4 THEN GOTO 575 

636 LET B=l 

640 PRINT AT 8,24; " " 

645 PRINT AT 8,26-LEN (STR$ R3) ; 

■ " ; R3 
650 PRINT AT 21,0; "QUER NOVAS QU 

ESTOES (S/N)?" 
655 LET Y$=INKEY$ 
660 IF Y$o"S" AND Y$o"N" THEN 

GOTO 655 
665 IF Y$="N" THEN GOTO 680 
675 GOTO 260 
680 CLS 
685 PRINT TAB 5;"**** SUA NOTA 

690 PRINT AT 8,0;"NUMERO DE";AT 
8,13; "NUMERO DE";AT 8,24; "* 
NOTA * " ; AT 9,0; "TENTATI VAS " ; 
AT 9,13;"ACERTOS";AT 9,26;"- 

700 IF X(1)=0 THEN LET X(l)=l 
705 LET V=INT ( (H (1) /X(l) *100) ) 
710 PRINT AT 11,3;X(1);AT 11,15; 

H(1);AT 11,27;V 
715 IF V<50 THEN PRINT AT 19,0;" 

ESTUDE MAIS UM POUCO... 

720 IF V>=50 AND V<=70 THEN PRIN 



T AT 19,0; "VOCE PODE IR A PR 
AIA ... " 

725 IF V>70 THEN PRINT AT 19,0;" 
VOCE ESTA ESTUDANDO MUITO. . . 

730 PRINT AT 21,0; "QUER NOVAS QU 

ESTOES (S/N)?" 
735 LET Y$=INKEY$ 
740 IF Y|="S" THEN GOTO 100 
750 IF Y$<>"N" THEN GOTO 735 
755 CLS 
760 PRINT AT 11,9;"**** FIM **** 

820 STOP 

1000 PRINT AT 18,0; "OK... VOCE A 
CERTOU ... 

1001 RETURN 

1010 PRINT AT 18,0;"PARABENS... 
CONTINUE ASSIM. . . 

1011 RETURN 

1020 PRINT AT 18 ,0; "VIVA. . . VOCE 
ESTA COBRA. . . 

1021 RETURN 

1200 IF Bol THEN GOTO 1230 
1210 PRINT AT 18,0; "OH... TENTE 
NOVAMENTE ... 

1215 LET B=2 

1216 FOR 1=1 TO 20 

1217 NEXT I 

1230 IF B<>2 THEN GOTO 1250 
1240 PRINT AT 18,0; "EPA... PENSE 

MAIS UM POUCO... " 
1243 LET B=3 

1245 FOR 1=1 TO 20 

1246 NEXT I 

1247 RETURN 

1250 PRINT AT 18,0 ; "DESCULPE, A 

RESPOSTA CERTA E:" 
1255 LET B=4 
1260 RETURN 
1300 LET X(1)=X(1)+1 
1310 RETURN 

1400 LET H(1)=H(1)+1 I 

1410 RETURN .* 



Obtenha sua bolsa 

de estudos com 

10% a 50% 

de desconto 

PTOce&? el 




• Linguagem Basic, Cobol, Fortran e 
Assembler 

• Contato direto com o computador 

• Aulas expositivas e prat teas 

• Suporte para alunos 

• Fornecimento de material did&tico 

• Aulas aos Sabados. 

TURMAS: MAN HA / TARDE / NOITE 
INSCRIBES PARA NOVAS TURMAS 

VAGAS LIMITADAS 
CERTIFICADO DE CONCLUSAO 

SCREEN 

A v. Eng. Luis Carlos Berrine, 991 
fone: 531-5008 



Os Micros Chegaram! 

Cartons Perifprir.ns nara APPI F ^^ 



Cartoes Perifericos para APPLE. 



• 







' ^nVIDEOTERM: 



I sfiWEflzTiB Cartao de expansao de memo- 

ria RAM de 16 Kb. 

cional para utilizarGSP/M. 

Cartao para aumentar a capacidade i 

terminal para 80 colunas e 24 linhas. 



PROGRAM MER:Kikii!!l!WiJ?lW!^iikI 



e quei mar 10 tipos E PROM s de 24 pi- 
nos. ia;tMI>iyii:TiH Cartao para de- 
senvolvimento e teste de novos 
projetos. Ik'HJWiiira Cartao de 
Interface 2 discos driver. 

Cartao de Interfa- 
ce para impressora tipo paralelo. 



MICROCCMPUTADORES LTDA. 

Industria e Comercio. 
Av. Brig. Faria Lima, 
1.664 -cj. 314 
tel. 212-6286 
Sao Paulo - SP. 



APPLE. CP'M sk> matcas reg>stradas de APPLE 
COMP INC e DIGITAL RESEARCH COP USA 



NOVAS OPQOES EM 
SAO PAULO 

Mais duas lojas em Sao Paulo espe- 
cializadas na comercializagao de micro- 
computadores. seus perifericos e supn- 
mentos: Fotoleo Informatica E CPM- 
Central Panamericana de Microinforma- 
tica. Na Fotoleo, o cliente encontra a 
maioria dos modelos de microcompu- 
tadores nacionais, alem de mals de 200 
programas, e a loja desenvolve software 
proprio. Sao oferecidos regularmente 
cursos de "Introducao a Llnguagem 
BASIC", e na compra de urn micro- 
computador (atraves de financiamento 
ou leasing) o cliente tera direito a um 
curso de BASIC gratuito. A CPM tambem 
comercializa microcomputadores nacio- 
nais e oferece suporte a quern adquire 
os seus produtos. desde assistencia 
tecnica ate pacotes especificos para 
qualquer area profissional. Na loja sao 
encontradas, alem dgs livros tecnicos, 
todas as revistas nacionais e algumas 
estrangeiras. Os produtos podem ser 
comprados atraves de financiamento, 
leasing ou consorcio. Os enderegos das 
novas lojas sao: Fotoleo na Av. Sao Joao 
25 e a CPM na Praca Clovis Bevilaqua 
121, 2° andar. Sao Paulo. 



XI FEIRA 

DE ELETROELETRONICA 



O setor de Informatica marcou a sua 
presenga na XI Feira de Eletroeletronica. 
realizada no final de junho, em Sao 
Paulo, com o langamento de diversos 
produtos. Entre eles estavam as impres- 
soras Gisele. fabricada pela Microway. e 
IG 80, da Unitron. A Gisele. que tern con- 
trolador Z80A. sete agulhas e imprirm, 
90 caracteres por segundo em 90 colu- 
nas. estara disponivel no mercado a par- 
tir de dezembro. A IG 80 apresenta alta 
resolucao grafica e caracteristicas espe- 
ciais de edigao de texto. e o inicio de 
sua comercializacao esta previsto para 
setembro. 

A Sysdata Eletronica. fabricante do 
computador JR. langou o controlador 
de disquetes de 5 1/4", face simples, 
com capacidade de 102 Kbytes por disco 
ja formatados. O mesmo controlador 
pode trabalhar com disquetes de 8". A 
DM. Eletronica Ltda. apresentou durante 
a Feira o seu microcomputador DM II. 
com processador 6502. compativel com 
Apple. O DM II tern memoria RAM inicial 
de 48 Kbytes (expansivel ate 128 K). 
armazenamento em cassete. disquete 
ou disco Winchester, alem de interface 
para impressora. Na configuragao basica, 
o equipamento custa por volta de 230 
ORTNs. Numa configuracao mais com- 
pleta. com 64 Kbytes de RAM e duas 
unidades de disquetes de 5 1/4". o prego 
fica em aproximadamente 580 ORTNs. 



Outro lancamento da Feira foi o 
Eltector, sistema para a racionalizacao 
do uso de energia eletrica composto por 
um microcontrolador de UCP 8085 que 
pode ser ligado a qualquer microcom- 
putador. 

Na area de calculadoras. as novida- 
des ficaram por conta da Texas, com os 
modelos Tl 57 LCD (calculadora cienti- 
fica programavel. com visor de cnstal 
liquido e bateria para mil horas de uso) 
e BA 55. calculadora financeira progra- 
mavel com impressora de PC 200 de 
papel termico. Essa impressora sera 
futuramente adaptavel a outras calcula- 
doras da Texas 

AUTOMAQAO E ROBOTICA 

A robdtica e automagao da manufa- 
tura estiveram em debate no I CONAl- 
Congresso Nacional de Automacao In- 
dustrial, realizado em meados de julho. 
em Sao Paulo. Com mais de 800 inscn- 
tos, foi discutido durante o Congresso 
o relatorio da Comissao Especial de 
Automacao da Manufatura, que aborda 
a questao em tres aspectos principals: 
tecnologico, industrial e social, visando 
a formacao de uma politica nacional de 
automagao industrial. Os resultados dos 
debates serao analisados pela Secretana 
Especial de Informatica. Na sessao de 
abertura. o secretario executivo da SEI, 
Edson Dytz, ressaltou que com este 
estudo a SEI pretende "dividir respon- 
sabilidades quanto a criacao desta poli- 
tica". Mas quando pensamos em auto- 
magao. imediatamente uma outra ques- 
tao se coloca que e o desemprego 
Quanto a isto. Manuel de Jesus Mendes. 
do CTI, esclareceu que nos proximos 
cinco anos. para se substituir cerca de 
5% da mao-de-obra utilizada hoje seria 
necessario um investimento de cerca de 
150 bilhoes de dolares. Assim sendo. 
segundo Mendes. esta substituigao nao 
sera tao de imediato. "A tecnologia da 
automagao tambem esta gerando novos 
empregos. So nos Estados Unidos a 
industria de robdtica gerou 75 mil novos 
empregos". afirmou Mendes. Ele ressal- 
tou ainda que o Brasil deve criar um 
programa de desenvolvimento tecnolo- 
gico adequado a nossa realidade. e na 
sua opiniao as linhas mestras para este 
programa seriam CAD (projeto assistido 
por computador), software e o equipa- 
mento em si. "Teremos que fazer robos 
brasileiros". afirmou Mendes. e ate o 
final deste ano podera estar na rua um 
comunidado da SEI para a escolha de 
empresas que irao desenvolver robos 
com determinada capacitagao tecnica", 
completou ele. Segundo Manuel de 
Jesus Mendes, ja existem empresas 
nacionais aptas a desenvolverem deter- 
minadas classes de robos mais simples, 
e os mais sofisticados, para os quais 
ainda nao estamos aptos tecnologica- 
mente a produzir. iremos de inicio im- 
portar como em qualquer outro campo ". 




BUSINESS CALC 

E parecido com o VisiCalc, mas bem 
mais versatil, seguro (nao deixa o usua- 
rio apagar o arquivo), tern comandos em 
Portugues e uma serie de caracteristicas 
que o famoso programa norte-americano 
nao tern, tais como colunas de larguras 
variaveis. fungao de apagar e imprimir 
tela e uma estrutura de comandos mais 
simples, incluindo a tecla AUX, que orien- 
ta o usuario. Assim Oswaldo Lopes do 
Nascimento Filho, diretor da Computel. 
do Rio de Janeiro, descreve o mais novo 
produto da sua empresa. o software Bu- 
siness Calc. 

Desenvolvido com base no sistema 
operacional SOM, para uso no Cobra 
305, o Business Calc — que compreende 
cerca de 15 mil instrugoesem linguagem 
de maquina — estara em breve disponi- 
vel na versao CP/M, o que possibilitara a 
sua utilizagao em diversos outros equi- 
pamentos. O programa pode construir 
matrizes d.e ate 78 colunas por 254 linhas, 
permitindo manusear todos os tipos de 
informagoes que possam ser tratadas sob 
a forma de tabela. tais como dados, valo- 
res e quantidades. Destina-se a aplica- 
goes de finangas. orgamento, planeja- 
mento, vendas, acorn panhamento e de- 
sempenho financeiro etc. 

MAIS UMA COMPUSHOP 

A Compushop esta abrindo sua pri- 
meira filial, que vai funcionar na avenida 
Juscelino Kubitcheck n°. 889, tambem 
na capital de Sao Paulo. Este e o pn- 
meiro passo no sentido de transformar 
a Compushop matriz em uma loja piloto 
e multiphca-la inclusive em termos de 
franquia para outros estados. Na mesma 
linha da primeira loja, a Compushop II 
oferecera a seus clientes grande vane- 
dade de microcomputadores nacionais, 
todos os penfencos necessanos e supn- 
mentos. alem de vasta literatura na area 
com revistas nacionais e importadas. Na 
parte de software, a Compushop tern 
contrato com software-houses, alem de 
aceitar encomenda de programas espe- 
cificos para as diversas areas profissio- 
•nais. Na nova loja tambem serao encon- 
trados os videogames, inclusive o Atari, 
bem como grande variedade de cartu- 
chos com jogos. 
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OS RESULTADOS DO ENESI 



A ingerencia de empresas estatais, 
multinacionais. conglomerados finance: 
ros e ate mesmo dos fabricantes de 
equipamentos no setor de software e 
servigos foram os principals temas deba- 
tidos no 4° ENESI — Encontro das 
Empresas de Servicos de Informatica. 
reahzado em Sao Paulo no final de junho. 

Tres itens podem ser considerados 
como os pontos altos do encontro: o 
compromisso da SEI de dedlcar maior 
atengao ao setor ( pretendemos estreitar 
cada vez mais os lagos com este impor- 
tante setor da industna de Informatica". 
disse o Secretano Joubert Brizida no 
encerramento do ENESI); a absorgao 
da Associacao das Casas de Software 
por parte da Assespro — Associacao 



Brasiieira das Empresas de Servigos de 
Informatica, o que reforgou a atuagao 
desta ultima, e a carta enviada pela IBM 
a Assespro oferecendo 1 1 propostas de 
atuagao conjunta com os bureaux na- 
cionais para a producao de software, 
que seria comercializado pela IBM. 

Na opiniao do presidente da Asses- 
pro-Nacional. Jose Maria Sobrinho, os 
principals fatores que afetam o setor 
sao a falta de consciencia sobre o que 
e a Informatica e como deve ser empre- 
gada; a importancia maior conferida ao 
hardware, em detrimento do software e 
dos servicos; a falta de caracterizacao 
e regulamentagao das atividades ligadas 
a informatica que, segundo ele, acaba 
gerando empresas fantasmas; e, princi- 




Benito Paret (esq.} da Assespro-RJ. Luigi Nese (SP), Jose" Maria Sobrinho (Pres.. Nacional), 
Joubert Brizida e Mauro Sebben (Vice-Pres., Nacional). 



palmente. a falta de definicao da area 
de atuacao das empresas privadas. esta- 
tais e multinacionais (neste particular. 
Sobrinho frisou que as empresas estatais 
e multinacionais. representando apenas 
10% do total de 800 empresas presta- 
doras de servigos existentes hoje no 
Brasil, abocanham 90% do faturamento 
do setor). Para Sobrinho. o futuro das 
empresas de servicos depende de tres 
grandes fatores: o avanco tecriologico; 
a miciativa empresarial especifica. que 
em seu entender caminha para a espe- 
cializacao; e a acao governamental, 
reforgando-se o dialogo com as associa- 
goes de classe. 

Ao termino dos trabalhos foi elabo- 
rado um documento a ser encaminhado 
a SEI e que contem, entre outras reivin- 
dicacoes do setor. as seguintes: a proi- 
bicao de que os programas-produto 
estrangeiros sejam comercializados nos 
orgaos da administracao direta e indi- 
reta por empresas nao nacionais; o 
congelamento nos orgaos da adminis- 
tracao direta e indireta das verbas desti- 
nadas ao desenvolvimento e manutengao 
de programas; a inclusao nos acordos 
firmados entre a SEI e os fabricantes 
nacionais de equipamentos de clausulas 
que definam a participacao das empre- 
sas independentes privadas nacionais 
de servicos como principals responsa- 
veis pelo desenvolvimento de programas- 
produto (aplicativos e de suporte); a 
participacao de representantes da Asses- 
pro nos diversos conselhos de Informa- 
tica; a proibicao da atuacao de empresas 
ligadas aos conglomerados financeiros 
no mercado de prestacao de servigos 
de Informatica e a transformagao da 
Digibras em uma agenda de fomento 
especializada para atender o segmento 
de servigos e programas de computador. 



INFORMATICA RURAL 



A Embrapa — Empresa Brasiieira de 
Pesquisa Agropecuaria esta adaptando 
para uso em microcomputadores. para 
repasse aos produtores rurais, uma sene 
de programas desenvolvidos ao longo 
de quase dez anos de pesquisa sobre 
diversos segmentos do setor. Um desses 
programas, o Profazenda — que subsidia 
a tomada de decisoes por parte dos 
administradores rurais, acompanhando 
suas atividades e buscando solugoes 
economicas frente a questoes como a 
escassez de recursos e a elevagao dos 
msumos basicos — ja foi testado em 
cerca de 30 agricultores. com bons 
resultados. 

Essa foi uma das informagoes divul- 
gadas durante o 1° Simposio de Infor- 
matica Rural, promovido pela Sagril — 
Comercial de Sistemas Agro-lndustriais, 
de 27 a 29 de junho. em Sao Paulo, com 
o apoio da Embrapa, SEI, Ministerio da 
Agncultura. Organizagao das Coopera- 



tives Brasileiras e Secretaria de Agncul- 
tura e Abastecimento de Sao Paulo. 

Outra miciativa governamental desti- 
nada a estimular a modermza'gao da 
administragao agricola mediante o em- 
prego de microcomputadores e o projeto 
Agrocon — Informatica Aplicada a Agro- 
pecuaria. cuja criagao foi anunciada 
pela SEI. O projeto sera executado em 
dois estagios. O primeiro, que ja se 
encontra em fase de execugao. consiste 
na elaboragao. por um grupo de traba- 
Iho. de um diagnostico da atual situagao 
do setor para colher dados a serem 
debatidos num seminario previsto para 
agosto. em Fortaleza. Com base nesses 
debates, a SEI devera definir as regioes 
que funcionarao como areas piloto para 
os testes, com duragao aproximada de 
dois anos. No segundo estagio do Agro- 
con, serao instalados microcomputadores 
nos escritbrios municipals da Emater. 



ABICOMP TEM NOVA 
DIRETORIA 

O empresario Edson Fregni, da 
Scopus, e o novo Presidente da Abicomp- 
Associagao Brasiieira da Industna de 
Computadores e Perifericos. substi- 
tuindo o comandante Antonio Didier 
Vianna. da Microlab, que ocupou o 
cargo nos ultimos dois anos. O novo 
Vice-Presidente da associagao e Antonio 
Carlos Loyola Reis. Superintendente da 
Cobra Computadores. o que marca a 
volta desta empresa a Abicomp. afastada 
desde o inicio do ano. Na carta de prin- 
cipios divulgada pela nova diretoria esta 
explicito o compromisso da entidade 
com a tecnologia nacional e a reserva 
de mercado para o setor. Os outros 
diretores eleitos sao: Carlos Eduardo 
Correa da Fonseca (Itautec); Antonio 
Carlos Cardoso (Sid); Luiz Augusto 
Lowndes Brasil (Novadata); Joseph 
Elbling (Multidigit) e Antonio Luis Mes- 
quita (Digiponto). 
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Uma descricao do microprocessador 6809 e dos integrados 6883, 6847 e 6821, 
que, juntos, tornam possfvel construir urn micro potente e barato. 



A f amilia 6809 da Motorola 



Carlos Eduardo C. T. da Fontoura 



St LE£AO 
OE 
DISPOSITIVO 




Figura I 
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N~~| o n9 13 de MICRO SISTEMAS 
(out/82) apresentamos com de- 
talhe o microprocessador 6502, 

uulizado pelos famosos micros Apple, 
Atan e Vic. Naquela ocasi3o, comenta- 
mos que o 6502 foi projetado por oito 
ex-funcionanos da Motorola que procu- 
raram otimizar a relacSo custo/perfor- 
mance do conhecidb microprocessador 
6800 da Motorola. 

Pois bem, o 6809 e" a resposta tecno- 
logica da Motorola ao advento do 6502. 
Muito mais do que um simples micro- 
processador, o 6809 6 o pai de uma fa- 
milia de circuitos integrados que rcpre- 
sentam hoje a ultima palavra em tecno- 
logia de rrucroprocessadores de 8 bits. 
Em conjunto com o 6883 (Multiplexa- 
dor Sincrono de Enderecos), o 6847 
(Gerador de Video a Cores) e o 6821 
( Adaptador de Interfaces de Penfen- 
cos), ele possibilita uma arquitetura de 
rrucrocomputadores bastante eficiente e 
de baixo custo. 

Neste artigo. pretendemos nao ape- 
nas descrever os recursos de um linico 
arcuito integrado, o 6809, mas sim de 
toda sua familia. Para tanto, vamos nos 
utihzar da estrutura de microcomputa- 
dor proposta pela Motorola para sua fa- 
milia de circuitos integrados e que foi 
integral mente adotada pela Radio Shack 
no seu micro TRS-80 Color Computer. 

O micro proposto e' extremamente 
compacto, pois a Motorola cnou uma 
famflia de circuitos integrados onde 
existem elementos especi'ficos execu- 
tando as principals funcoes de um mi- 
crocomputador (na figura 1 apresenta- 
mos o diagrama em blocos do micro- 
computador). Antes de entrarmos em 
detalhe no seu funcionamento, vamos 
procurar conhecer melhor os arcuitos 
integrados que o constituent 



UNIDADE CENTRAL DE 
PROCESSAMENTO 6809E 

O 6809E e o pnncipal controlador 
do microcomputador, pois e ele quern 
gerencia o fluxo de informacoes entre os 
diversos componentes internos do mi- 
cro. O sufixo E acrescido ao nome do 
integrado indica que este modelo em 
particular do 6809 nao possui circuito 
de clock interno e necessita de um clock 
externo para funcionar. 

A arquitetura interna do 6809E e 
mmto eficiente porque esta montada so- 
bre uma estrutura de 16 bits. Desta for- 
ma, embora o 6809E seja um micro- 
processador de 8 bits, lnternamente ele 
opera com registradores de 16 bits, fa- 
to que aumenta sigmficativamente sua 
eficiencia. A figura 2 apresenta o dia- 
grama em blocos da arquitetura interna 
do 6809E, que descreveremos a seguir: 
- Program Counter (PC) - Armazena o 
endereco da proxima mstrucSo a ser 
executada pelo processador. 



- Hardware Stack Pointer (S) - Arma- 
zena o endereco no topo da pilha de sis- 
tema. Esta pilha e utihzada pelo proces- 
sador no tratamento das interrupcoes de 
hardware e chamadas de sub-rotmas. 

- User Stack Pointer (U) - Armazena o 
endereco do topo da pilha de usuano. 
Esta pilha e exclusiva do usuano. que a 
utiliza pnncipalmente para passar argu- 
mentos entre sub-rotinas. 

- Registradores de Indice X e Y - Ar- 
mazenam o deslocamento a ser somado 
ao endereco nas instrucoes com endere- 
camento indexado. 

- Vu mil lad ores A e B - Armazenam o 
dado a ser operado pela unidade antme- 
tica e logici. 

- Direct Page Register (DP) - Armaze- 
na a parte mais significativa do endereco 
utihzado nas instrucoes com endereca- 
mento direto. 

- Registrador de Estado (CC) - Descre- 
ve o estado do processador apos a exe- 
cucao de cada instrucao. 

- Unidade Aritmltica e Logica (ALU) 

- Executa todas as operacOes logicas e 
antme'ticas do processador. 

- Registrador de Instrucao (RI) - Ar- 
mazena a mstrucSo a ser executada pelo 
processador. 

- Logica de Interrupca'o - Gerencia o 
tratamento das quatro interrupts de 
hardware existentes (RESET, NMI, 
FIRQ e IRQ). 



- Logica de Controle de Ban-as - Ge- 
rencia a utihzacao das barras de ende- 
reco e de dados pelo processador (R/W, 
BUSY, HALT. BA, BS, AVMA e TSC). 

- Circuito de Timing - Gera os sinais 
de clock interno (a partir dos sinais de 
clock externo EeQ) necessanos ao per- 
feito funcionamento do processador. 

No tocante ao software, o 6809 pos- 
sui hoje, sem diivida alguma, um com- 
pleto conjunto de instrucoes. Sao 1 .464 
instrucoes, agrupadas em 59 tipos e 15 
modos de enderecamento. Entre estas 
instrucoes destacam-se a de multiphca- 
ca"o. as de interrupcao por software e as 
que manipulam dados com 1 6 bits. 

MULTIPLEXADOR SINCRONO DE 
ENDERE^OS 6883 (SAM) 

O 6883 e o coracSo do microcompu- 
tador. £ ele quern gera todos os sinais 
de sincronismo necessanos ao perfeito 
funcionamento dos circuitos integrados 
que constituem o microcomputador. A 
figura 3 apresenta o diagrama em blo- 
cos da arquitetura interna do 6883. cu- 
jas funcoes descrevemos a seguir: 

- Geracao dos sinais de clock (E e Q) 
necessanos ao funcionamento do 6809E 

- Atraves da divisao do sinal do crista! 
por 8 ou 16. A frequencia e selecionada 
por software e pode ser de 0.9 ou 1.8 
MHz. 
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AS IMPRESSORAS QUE VAO 
BEM COM TODOS OS MICROS 



Vkii 



GARANTIMOS 

MENOR 

PRECO 

DO MERCADO 

Aikk 



Seja qual foro seu mini ou micro- velocidade de ate 340 caracteres 

computador, a Clappy tern a me- por segundo, a Clappy tern a im- 

Ihor opcao em impressoras ma- pressora certa para a sua necessi- 

triciais, pelo menor preco. dade. 

Para interfaces paralela ou serial, Aproveite para conhecer tam- 

linhas de 80 ou 1 32 posicoes e bem o nosso lancamento na area 

de Plotters. 



ELEBRA 
EMILIA 8010/8030 




Interface paralela ou serial (75 a 9600 bps), 
100 cps, 80 ou 132 posicoes, matriz de 
pontos 9x7, densidade horizontal 5 
ou 10 cpi, densidade vertical 6 ou 8 Ipi, 
formulario continuo 1 a 5 vias. 



PROLOGICA 
P720 




Interface paralela e serial, 200 cps, 
132 posicoes, matriz de pontos 7x9, 
densidade horizontal 10 cpi, densidade 
vertical 6 Ipi, formulario continuo de 
1 a 6 vias. 



STRATUS 
S310 




DISMAC 
STAR 




Interface paralela, 80 cps, 80 posicoes, matriz 
de pontos 9x7, densidade horizontal 
5 a 16,5 cpi, densidade vertical 4,6 ou 8 Ipi, 
conjunto de caracteres graficos, formulario 
continuo 1 a 4 vias ou papel carta. 



ELGIN 
ELGIN LADY 



Ik A. A 



TESTADAS E 

OPERANDO 

COM TODOS OS 

MICROS 



POLYMAX 
POLYPRINT 




Interface paralela ou serial (110 a 1200 bps), 
90 cps, 80 posicoes, matriz de pontos 7x9, 
densidade horizontal 5,2 a 17,1 cpi, 
densidade vertical 6 Ipi, formulario continuo 
1 a 4 vias ou papel carta. 



GLOBUS 
M 100 80/100 




Interface paralela ou serial, 100 cps, 
132 posicoes, matriz de pontos 7x9, 
densidade horizontal 10 a 16,6 cpi, densidade 
vertical 6 ou 8 Ipi, conjunto de caracteres 
graficos, formulario continuo 1 a 6 vias ou 
papel carta. 



BAUSCH & LOMB 
PLOTTER DMP- 29 



Interface paralela ou serial (110 a 9600 bps), 
112 cps, 80 posicoes, matriz de pontos 7x9, 
densidade horizontal 5,2 a 17,1 cpi, 
densidade vertical 6 Ipi, caracteres 
sublmhados, formulario continuo 1 a 4 vias 
ou papel carta. 





Tracador grafico digital, resolucao de 0,005 
pol., 8 penas, mudanca automatica de pena, 
velocidade axial de 16 pol seg., diagonal de 
22 pol/seg., interface RS 232 C, 93 caracteres 
maiusculos e minusculos, em 255 tamanhos, 
360 ang., rotacao, area de tra^ado de 
10 x 15 pol. Opera com qualquer 
microcomputador com interface serial 
(inclusive AP II e CP 500) 




Interface paralela e serial (75 a 9600 bps), 
100 cps, 80 ou 132 posicoes, matriz de 
pontos 5x7, densidade horizontal 8 a 
16,5 cpi, densidade vertical 6 ou 8 Ipi, 
caractere reverso, negrito, formulario 
continuo 1 a 4 vias. 



INTERFACES/ACESSORIOS/ 
SUPRIMENTOS 

INTERFACES PARALELA E SERIAL PARA 

AP II, DGT-100, CP 500, MAXXI E 

MICROENGENHO 

CABOS DE LIGAQAO 

FITAS PARA IMPRESSORA 

FORMULARIO CONTINUO 80 E 132 

POSICOES EM CAIXAS DE 1 OU 3 MILHEIROS. 




Centra: Av. Rio Branco, 12 - loja e sobreloja 

234-0214 • - 253-3170 • 253-3395 • 283-3588 • 234-1015 

Rio o> Janeiro -RJ 



Venha a nossa loja ou solicrte a visita de urn representante Entregamos em todo o Brasil pelo reembolso VARIG 
Breve Clappy Copacabana Show Room Rua Pompeu Loureiro. 99 
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- Administrate da memdria de acesso 
randomico do microcomputador — 
Atravgs da transformaca"o dos enderesos 
forneados pelo 6809E em sinais compa- 
tiveis com a memdria (RAS, CAS, WE, 
Z0, Zl, Z2, Z3, Z4, Z5, Z6 e Z7). Ele 
permite o controle de dois tipos de me- 
m6na (estatica ou dinamica) em cinco 
diferentes tamanhos: 4, 8, 16, 32 e 64 
Kb, tudo selecionado por software. No 
caso especifico das memdrias dinamicas, 
o refresh peri6dico tambe"m i comanda- 
do por ele. 

- AdministracSo da tela de video do 
microcomputador — Atrave's do contro- 
le dos sinais de varredura da memdria 
de video (VCLK, DAO e HS). A memd- 
ria de video armazena as informacoes 
apresentadas no video e pode ser lida de 
quinze formas diferentes, todas selecio- 
nadas por software . As modalidades sa"o : 

- Alfanumiricas (16 linhas de 32 ca- 
racteres) 

- Alfanume'rica invertida (16 linhas de 
32 caracteres) 

- Semigrdfica 4 (matrix de 64x32 com 
9 cores) 

- Semigrdfica 6 (matrix 64x48 com 
dois conjuntos de 4 cores) 

- Semigrdfica 8 (matrix 64x64 com 9 
cores) 

- Semigrdfica 12 (matriz 64x96 com 9 
cores) 

- Semigrdfica 24 (matrix 64x192 com 
9 cores) 

- Grdfica 1C (matrix 64x64 com dois 
conjuntos de 4 cores) 

- Grdfica 1R (matriz 1 28x64 com dois 
conjuntos de 2 cores) 

- Grdfica 2C (matrix 128x64 com dois 
conjuntos de 4 cores) 

- Grdfica 2R (matrix 1 28x96 com dois 
conjuntos de 2 cores) 

- Grdfica 3C (matrix 128x96 com dois 
conjuntos de 4 cores) 

- Grdfica 3R (matrix 128x192 com 
dois conjuntos de 2 cores) 

- Grdfica 6C (matrix 128x192 com 
dois conjuntos de 4 cores) 

- Grdfica 6R (matrix 256x192 com 
dois conjuntos de 2 cores) 

A diferenca basica existente entre es- 
tas modalidades de apresentacao 6 o ta- 
manho da memdria de video necessana 
para mapea-las. Ela vana de 512 bytes 
no caso de tela Alfanume'rica, ate" 6144 
bytes no caso de tela Grdfica 6R. 

- Selecao de dispositivos perifericos - 
Atrave's da decodificacao dos enderecos 
forneados pelo 6809E em oito sinais de 
chip enable (SO, SI e S2). 

GERADOR DE VIDEO A CORES 
6847 (VDG) 

6847 6 o gerador de video a cores 
do microcomputador. £ ele que trans- 



forma as informacoes digitals armaze- 
nadas na memdria de video do micro- 
computador em sinais analogicos de te- 
levisao. Como existem diversos sistemas 
de televisao a cores (NTSC, PAL/M, SE- 
CAM), o 6847 fomece tres sinais bdsi- 
cos (Y, R-Y e B-Y), que devem ser tra- 
balhados externamente a ele para con- 
feccSo do sinal de video composto com- 
pativel com o sistema de cores local. 

6847 interpreta as informacoes na 
memdria de video do microcomputador 
da mesma forma que o 6883. Porfm, en- 
quanto que o 6883 efetua a selecfo da 
modalidade de leitura por software, o 
6847 utiliza um conjunto de oito linhas 
de controle para fazer esta mesma sele- 
9Z0 A/G, A/S, INT/EXT, GMO, GM1, 
GM2, CSS e INV). 

Na modalidade Alfanumerica, o 6847 
pode utilizar seu gerador de caracteres 
interno (padrao ASCII letras maiuscu- 
las) ou enta"o optar por um gerador de 
caracteres externo em ROM com o pa- 
drao desejado pelo usuano. 



ADAPTADOR DE INTERFACE DE 
PERIFERICOS 6821 (PIA) 

6821 6 a via de comunicacSb ex- 
terna do microcomputador. £ ele quern 
gerencia o fluxo de informacoes entre o 
processador e os dispositivos de entrada 
e saida. A figura 4 apresenta o diagrama 
em blocos da arquitetura interna do 
6821. 

diilogo entre o 6821 e o proces- 
sador e feito por interme'dio de uma 
porta bi-direcional de 8 bits (D0-D7) e 
10 linhas de controle, divididas em uma 
de RESET, quatro de chip enable (CSO, 
CS1 , CS2 e ENABLE), uma de sentido 
de didlogo (R/W), duas de interrupefo 
(IRQA e IRQR) e duas de seleca"o dos 
registradores internos do 6821 (RSO e 
RSI). 

dialogo entre o 6821 e os disposi- 
tivos de entrada e saida 6 feito por ln- 
termedio de duas portas bi-direcionais 
de 8 bits (PA0-PA7 e PB0-PB7) e quatro 
linhas de controle (CA1, CA2, CB1 e 
CB2). 



1R0A 38 




IROB 37 -• 



Figura 4 
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Interfaceando os dois dialogos do 
6821. existem sete registradores (BIR, 
CRA, ORA, DDRA, CRB, ORB e 
DDRB). 

MICROCOMPUTADOR 



Agora que conhecemos um pouco 
melhor cada membro da familia Moto- 
rola, vamos ver como eles podem ser 
reumdos e constituir o rrucrocompu- 
lador apresentado na figura 5. Para faci- 
btar a compreensa"o do circuito, vamos 
procurar apenas descrever a dinamica de 
funaonamento do conjunto. 

Ao ser ligado, o miCTOcomputador 
executa um ciclo de RESET automati- 
co, for9ado pelo arcuito RC, que esta 
conectado na sua linha de RESET e a 
mantem em baixa o tempo suficiente 
para o seu acionamento. Findo este pe- 
n'odo. o capacitor de RC se carrega e le- 
vanta a linha, que passa a nao mais ln- 
terfenr no funaonamento do micro- 
computador. 

aclo de RESET do microcompu- 
tador zero todos os registradores mter- 
nos dos circuitos integrados programa- 
veis e forca o processador a miciar a 
execu<;ao de programas a partir do en- 
dereco armazenado nas duas ultimas po- 
acOes de mem6na do microcomputa- 
dor. respectivamente FFFE e FFFF, em 
hexadecimal. A obtencSo deste endere- 
cp de lnicializacSo e" feita pelo 6883. 
que recebe do 6809E os enderecps 
FFFE e FFFF, os decodifica e gera o si- 
nal de chip select necessano a habilita- 
cSo da ROM que ocupa a parte superior 
do espacp de enderegamento do micro- 
computador. 

A ROM, uma vezhabilitada.informa 
ao 6809E o conteiido das posicdes de 
memona FFFE e FFFF. Este dado 6 
carregado no Program Counter do 
6809E, que passa a executar o progra- 
ma de lnicializacao. A pnmeira tarefa do 
programa de micializacSo consiste em 
configurar nos registradores internos dos 
circuitos integrados programaveis todos 
os recursos de hardware utilizados pelo 
microcomputador. £ nesta fase que sao 
definidos o tipo e o tamanho de mem6- 
ria de acesso randomico manipulada pe- 
lo 6883 e os tipos de perife'ncos conec- 
tados nas portas A e B do 6821 . Ao te*r- 
irano deste programa de lnicializaclo, o 
controle 6 transferido para um Interpre- 
tador de bnguagem de alto ni'vel que es- 
\i normal mente armazenado em ROM e 
vai possibditar ao usuario ter acesso aos 
recursos do microcomputador. 

Interpretador lnicialmente in forma 
ao 6847 (atrave"s de uma das portas do 
6821) o formato da tela de video a uti- 
hzar. apresenta em seguida na tela o 
cabe<palho de inicializafa'o e flea aguar- 

MICRO SISTEMAS, agosto/83 



dando por comandos provenientes do 
usuano. Estes comandos sao lidos pelo 
Interpretador e armazenados em mem6- 
ria de acesso randomico pelo 6883, que 
executa tambe'm o refresh pen6dico da 
tela de video, percorrendo a memdria 
de video que se en contra tambe'm em 
RAM. 

Dois buffers, o 74LS244e o 74LS273, 
colocados na barra de dados, respecti- 
vamente entre o 6809E e a saida da 
RAM, e entre o 6847 e a saida da RAM, 
auxiliam o 6883 no controle do fluxo 
de dados entre a RAM, o processador e 
o video. Quando o dado £ para o 6809E, 
o 74LS244 6 habilitado e o 74LS273 
desabilitado. Caso o dado seja para o 
6847, acontece exatamente o inverso:o 
74LS273 6 habilitado, enquanto o 
74LS244 6 desabilitado. 

No tocante a penf^ncos, o esquema 
do microcomputador nao apresenta 
maiores detalhes e deixa a cnte'no do 
projetista a conexSo dos dispositivos 
que julgar necessanos. linico ponto a 
ressaltar i o de que todas as operates 
de entrada e saida de dados entre o mi- 
crocomputador e os penfencos devem 
ser feitas por interme'dio de uma PIA e 
que devem ser usadas tantas PIAs quan- 
tas forem necessanas para controlar to- 
dos os perife'ncos. A vantagem deste 
procedimento 6 a simplificacSo da inter- 
face, que passa a ser inteiramente con- 
trolada por software. Basta enderecar 
uma posicao de mem6na que esteja den- 
tro do espaco de endere^amento de PIA 
que o demultiplexador 74LS138 habili- 
ta a PIA e passa o dado para o registro 
apropnado. 
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System Design Ltda. • Informatica 

SOFTWARES DISPONIVEIS PARA 

MICROS EM DOS (Apple e Similares) 

PASSO A PASSO - Curso de Basic em 
diskette de factl rapldo e eflciente apren- 
dlzado no seu propno micro CrS 60.000,00 

MAILER - Mala dlreta com varlas opcoes 
de emlssao CrS 35-000,00 

MICROWRITER - Eficlente processador de 
textos CrS 60.000,00 

DOS 3.3 BASICS - UMitano para otlmlzar 
seu DOS CrS 45.000,00 

JOGOS • Varlos jogos estrateglcos e de 
aventura CrS 15.000,00 

Olimpiada, Slmulador de voo, Xadrez, 
Choplifter (**), Castelo Wolfensteln, Casa 
dos Misterlos, Combate Aereo (*) Invaders 
(•), Zork (•). 

•Utlllzam DOS 3.3 BASICS 

••Utlllzam controladores (joystick/paddles) 



PEDIDOS - Atravei de cheque nominal a 
nossa calxa postal ou por te let one 
(Atendemos todo o Brasil via VARIG). 

CEP 05096 - Cx. Postal 60136 - S. Paulo 

Tel.: 813-4031 




CURSOS DE ESPEOALIZACAO 
PROFISSIONAL 





MICROCOMPUTADORES 

MICROPROCES 

SOFTWARE 

BASIC 
ASSEMBLER 

HARDWARE 

INTERFACES DO 8080/85 

MICROPROCESSADOR Z-80 

MICROPROCESSADORES 8080/85 

LOGICA DIGITAL I e II 
AMPLIFICADORES OPERACIONAIS 

^m TELEPROCESSAMENTO «Hi 

TELEPROCESSAMENTO I - HARDWARE 
TELEPROCESSAMENTO II - SOFTWARE 

■HHeW BANANA85fHB^ 

MICROCOMPUTADOR PARA 

DESENVOLVIMENTO DE 

SOFTWARE E HARDWARE 

REVENDEDOR AUTORIZADO 

^m AULAS PR ATIC AS COM «B1 

MICROCOMPUTADORES NACIONAIS 

KITS E LABORATORIOS DE 

ELETRONICA DIGITAL 
TURMAS COM 20 ALUNOS Ml 
CURSOS FECHADOS PARA EMPRESAS 




lAV. PRESIDENTE VARGAS 590/ GR. 217 
RIO DE JANEIRO Tel. (021) 233-5239 
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CAHACTEHISTICAS TECNICAS 



• CPU com nuctoprocesudoi Z80 rtr ?MH/ mtmwu principal de 48KB 

• Ttclado allanumerico com 54 tec las e funcao aulo repeat reset com protecao conirj acionamento 
kMohndrki 

• Cone«oes para TV ou monitor de video 16 linhas com 64 col 16 linhas com 3? col. modo 
|48» l?8 pernios 

lace par* gravador com velocHlar k- de 500 e 1 500 Bauds 

• Eapamon para: controlador de drives, porta paralela (imprniora) e porta serial RS 737 (Modem, 
etc) 

• Dimensoes altura 7,5 cm - compr 33.0 cm larg ??,0cm peso 1,5 kg 

Compat ivel em todos o» aspectos com o CP 500. inclusive no software, 
pocem e composto de modulus que podem ser adquiridos de acorrto com suas necessidades 



O MICRO QUE JA 
NASCEU GRANDE 



K *W0 



CP500-CP-500-CP200 



SOFTWARE 



JOGOS: 
BATALHA AEREA 

- CP-200 (F). 3.850.00 
CP 500 (F/D) 4. 400 ,00 :: 

BATALHA NAVAL 

■ CP-200 (F) . 5.830,00 

FORCA 

-CP-200 (F). 4.400,00 

-CP-500 (F/D) 4.620,00* 

TIRO AOALVO 

- CP-200 (F). 3.850,00 

- CP-500 (F/D) 4.400,00* 
BIORRITMO 

CP-200 (F). 3.850,00 
LOTO 

CP-200 (F). 4.180,00 
TABU ADA 

- CP-200 (F). 3.850,00 
CP-500 (F/D) 3.080.00* 

SIMULADOR DE V0O 

- CP-200 (F). 6.600.00 
COMANDO UFO 

CP-200 (F). 3.850,00 

- CP-500 (F/D) 4.950,00 ' : 
OESTESELVAGEM 

CP-200 (F) . 4.620,00 
SENHA 

-CP-200 (F). 4.950,00 
INVASAOCOSMICA 

CP-200 (F) . 6.050,00 

SOMENTE P/CP-500 
PATRULHA (F/D) 

6.160,00* 

INVASORES (F/D) 

5.610,00* 

PADDLE PINBALL (F) 
Simula jogo de fliperama 
9.600,00 

DISCOS VOADORES(F) 
Controle o canhao para 
abate los .... 8.000,00 



DANCING DEMOND (F/ 
D) - Incn'vel demoninho 
dancarino . . S.OOO.OO" 
XADREZ (F/D) 
6 niveis que vao desafia- 

lo 10.000,00* 

CUB0 (F/D) 

Voce nunca resolveu o 

cubo? A solucao 6 cubo . 

6.400,00* 

JOGOS EM BASIC (F/D) 

6.400,00* 

JOGOS (F/D) COSMIC, 
SCARFMAN, LUNAR, 
BARRICADA, GALAX I. 
METEOR, PENETREI- 
TOR -cada . 9.600,00 : 

PROMOC0ES 

PACOTE ECONOMICO 

(F) 

Para CP-200 NE-Z8000, 

com musica, damas, ga- 

ma"o, conta corrente e 

controle de estoque .... 

4.000,00 

10 JOGOS EM DISCO 
Para CP-500, variedade: 
boa, sky, pouso lunar, 
Jornada, teaser, cupim, 
hopper, cram, fireman, 
spacefire . . . 24.000,00 

APLICATIVOS 
SOMENTE P/CP-200 (F) 



CONTAS A PAGAR 
Controla o acumulado do 
mes, ano e operacGes e 
poupanca . . 13.200,00 
AGENDA 

Trabalha com dois tipos 
de informacao atividade e 
telefone .... 8.800,00 



CADASTRO DE CLIENTE 
Cadastra p/cliente a razSb 
social, rua, bairro, cid., 
est., CEP., tel., produto 
adquirido, data da aqui- 

sicao 13.750,00 

VlOEO-TlTULO 
Cria ti'tulos para video-ta- 
pes, inclusive com movi- 
mentos. . . . 16.500,00 
VU-CALC 

Destina-se a execuca"o de 
ci leu los sobre uma plani- 

Iha 10.000,00 

SOMENTE P/CP-500 
CADASTRO DE CLIEN- 
TES (D) . . . 20ORTN 
MALA-DIRETA (D/l) 
Sistema de mala direta 
permitindo a impressao 
de etiquetas utilizando 
ou nao chave de acesso 

40.000,00 

FINANQAS (D) 
Engloba funcoes de juros 
compostos, analisede pre- 
co de venda e rendimen- 
tos, taxas de retorno, ta- 
bela de amortizacao, sal- 
do hipotecario, pagamen- 
tosaprazo . 40.000,00 
PROCALC (D) 
Destina-se a execucao de 
calculos sobre uma pla- 
nilha .... 120.000,00 
VIDEO (F/D) 
Editor grafico da tela. 
Desenhe com facilidade 
no CP-500. Armazena as 
telas em fita ou diskette 

10.000.00* 



BANNER (F/D/l) 
Imprime mensagens em 
letras garrafais (80 col.) 

6.400,00 : 

SCRIPY (I) 

Completo e versatil pro- 

cessador de texto 

em fita ... . 32.000,00 
em disco . . . 40.000,00 

CONTROLE DE ACOES 

(D/F) 

Para quern gosta da Bol- 

sa. Mostra os resultados 

(Lucro/Perda) 

6.400,00 : 

DIRET0RIO (D) 
Organiza e cadastra todos 
os seus programasearqui- 
vos em diskette automa- 
ticamente. Pesquisa por 
disco ou programa e po- 
de imprimir ordenada- 
mente .... 16.000,00 

BANCO DE DADOS 
(D/l) 

Sistema de fichano ele- 
tronico. Voce mesmo cria 
as fichas e pode pesquisar 
de vanos modos, alem de 
permitir impressao. Simi- 
lar ao Profile 40.000,00 

CARTA ASTRAL (F/l) 
Este programa faz todos 
os calculos necessanos ao 
desenho de uma carta as- 
tral e ainda imprime a 
mesma em questab de mi- 
nutos. So nao interpreta . 
15.000.00 



UTILITARIOS 

(SOMENTE P/CP-500) 
CONVERT (F/D) 
Convene niimeros deci- 
mals e hexa. Pode ser 
chamado a qualquer ins- 
tante e nao atrapalha o 

BASIC .... 6.400,00* 

LISTA (D/l) 

Imprime as listagens de 
programas em BASIC de 
forma limpa e organiza- 
da. Nao se perca com 
LLIST .... 16.000,00 
SUPERTECLA (F) 
Cada tecla de seu CP- 
500 representa duas pala- 
vras do BASIC alem de 
seu valor normal. Reduz 
drasticamente o tempo 
gasto na teclagem de pro- 
gramas 8.000,00 

ODONTO (F/D) 
Engloba setor financeiro, 
agenda, cadastro, mala di- 
reta, lay-out dentario . . 

50ORTN 

EDITOR (D) 
Poderoso editor assem- 
bler para os que progra- 
mam em linguagem de 
miquina. Manual c/instru- 

c6es 32.000,00 1 

SOUND (F/D) 
Pequena mas util subro- 
tina que cria uma nova 
palavra em BASIC — 
"SOUND". Instructs 
detalhadas de como co- 
loca-la em seus progra- 
mas 6.400,00 * 



F- Para CP-500/CP-300 ou CP-200 em fita. I - Requer impressora. 

D- Para CP-500/CP-300 em disco. " -Acrescentar Cr$ 6.000,00 p/versao em disco 



Filcras Imporucao • Rapraantacoai Ltda 
Rua Aurora. 165 - CEP 01709 SSo Paulo - SP 
I Tele» 1 131298 FILG BR PBX 223 7388 - R»m»u 2. 4. 
12. 18. 19 - D.retos 223 1446. 222 3458. 220 5794 i 
220-9113 Reembolw - R 1 7 Direto 222-0016.220 7718 



NOME TEL. 

END CEP 

CID EST EQUIP 

U ENVIE AS INFORMACOES ACIMA PARA FILCRES IMP. E f 



■ ■ ■ 



Problemas com seu Ingles? Peca ajuda a este tradutor, desenvolvido para o D-8000 
e demais micros compati'veis com o TRS-80 Modelo I. 



Tradugao simultanea 



Ivo D 'Aquino Neto 



E 



ste programa, dedicado especialmente as cnancas, tem 
como objetivo tornar mais agradavel o aprendizado da 
lingua inglesa. 

Sabemos que o essencial para o dominio de Uma lingua e a 
manutenc^o do vocabulario. Pois € justamente sob este aspecto 
que o programa Tradutor nos parece bastante util: com ele po- 
demos montar um vocabulario que va se ampliando a medida 
que novas palavras forem surgindo. 

O niimero de palavras que podem ser armazenadas depende, 
6 claro, da capacidade do sistema utilizado. £ possivel, por ou- 
tro lado, otimizar a utilizacSo da memoria, iniciando a cons- 
trucao do vocabulario a partir de palavras encontradas em ca- 
demos e livros do estudante. 

Sempre que novas palavras forem surgindo, elas podera"o ser 
acrescentadas ao vocabulario de nosso Tradutor, at£ que o sis- 



tema esteja com sua capacidade de mem6ria esgotada. A partir 
deste instante, para acrescentarmos novas palavras, precisare- 
mos retirar do vocabulano algumas outras, de preferencia 
aquelas que ja tenham sido efetivamente decoradas pelo estu- 
dante. 

Adotando este procedimento, o Tradutor ira" se comportar 
como um arquivo extremamente dinamico, e apesar do niime- 
ro lirmtado de vocdbulos armazenados, podera ser utilizado de 
maneira bastante eficiente. 

programa foi apresentado como tradutor de Ingles para o 
Portugues e vice -versa. Entretanto, como funciona a partir da 
associacSo de pares de palavras, pode ser empregado, sem q uni- 
que r alteracao. para traduzir palavras de qualquer lingua para 
outra (ou para a mesma, funcionando como dicionario de si- 



Estrutura do programa 



pk 



1 . Linhas 10 a 90 - Cabecalho. 

2. Linhas 100 a 200 - Definicao de varidveis e apresen- 
tacSo do ti'tulo do programa. 

3. Linhas 300 a 350 - TRADU(:AO. Neste trecho, o 
programa solicita a palavra a ser traduzida, a qual € com- 
parada com as palavras kdas pelas instrucOes READ. Se 
ocorrer a coincidencia entre a que for fomecida pelo 
usuino e uma palavra lida, ambas sera"o apresentadas no 
video. O programa sera - enta"o desviado para a hnha 700 
(Quadro de opcOes), ap6s PAUSA na mesma linha. Caso 
nao ocorra a coincidencia, ao ser encontrado o simbolo 

@ , o programa sera desviado para a linha 400. 

4. Linha 400 - Apresentacao da mensagem NAO HA 
REGISTRO DESSA PALAVRA durante algum tempo e, 
em seguida, desvio para a linha 700 (Quadro de opcCes). 

5. Linhas 500 a 555 - INTRODUgAO DE NOVAS PA- 
LAVRAS. Neste mtervalo, o programa fornece uma ex- 

caca"o sobre como proceder para incluir novas palavras 




no vocabulano. Caso o desvio para a linha 500 tenha 
ocorrido apos uma tentativa mal sucedida de traducao de 
palavra, teremos a apresentacSo da linha onde deverao 
ser incluidas as novas palavras. Ao ser pressionada a te- 
cla ENTER, o programa sera" interrompido pela instrucSo 
END a fim de permitir a passagem para o modo de 
edicao. 

6. Linhas 600 a 605 - PAUSA. Estas hnhas provocam 
uma pausa na execu?ao do programa atd que a tecla 
ENTER seja pressionada. 

7. Linhas 700 a 740 - MENU. Este trecho permite ao 
usuino a escolha de uma dentre as tres opcoes de acSo: 
TraducSo, lntrodu9ffo de novas palavras e Fim de pro- 
grama. 

8. Linha 1000 em diante - Sao armazenados os pares de 
palavras em instrucdes DATA. O simbolo @ e o numero 
da ultima linha, separados por virgula, devem encerrar a 
relagao de palavras. 
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********************** 

» 

* PROGRAMA TRADUTOR : 

* - INGLES /PORTUGUES , PORTUGUES/INGLES 

* VERSAO: 26/12:00 

* DESENVOLVIDO POR: 

* IVO D'AQUINO NETO - TEL.: (0482) 33-8371 

* EM: 24/12/1982 



10 
20 
30 
40 
50 
60 
70 
80 

100 CLEAR1000:DEFSTRA-Z 

150 CLS:PRINTTAB(4) "* * * TRADUTOR INGLES/PORTU 

GUES, PORTUGUES/INGLES * * •" :FORI%=lTO3000 : 

NEXT 
200 GOSUB700 

299 •*»* TRADUCAO *** 

300 CLS:RESTORE:PRINT@26,"- TRADUCAO - 

310 PRINT@200, "ESCREVA A PALAVRA QUE VOCE QUER TR 

ADUZIR":INPUTPA 
320 READI,P:IFI = "@>"THEN400 
330 IFPA=IPRINT@460,"' M PA"'";" - TRADUCAO - ",•'■'" 

P" , ":GOSUB600:GOTO700 
340 IFPA=PPRINT@460 , " ' "PA M '"; " - TRADUCAO - " ; " ' " 

I" •":GOSUB600:GOTO700 
350 GOTO320 
400 CLS:PRINT@465,"* * * NAO HA' REGISTRO DESSA 

PALAVRA * * *":FORI%=lTO2000:NEXT:GOTO700 

499 '* * * INTRODUCAO DE PALAVRAS * * * 

500 CLS:PRINT©19,"- INTRODUCAO DE PALAVRAS -":IFVA 
L(P) <>0LI=PELSELI=" ( * DA LINHA) " 

505 PRINT:PRINTTAB(5) "1. ENTRE NO MODO DE EDICAO: 
510 PRINTTAB(IO) "- EDIT-LI"; <NEW LINE> ; <X>" 
515 PRINTTAB(5) "2. INTRODUZA A PALAVRA EM INGLES: 
520 PRINTTAB(IO) "- SUBSTITUA O SIMBOLO '«" PELA P 

ALAVRA EM INGLES 
525 PRINTTAB(5) "3. INTRODUZA A PALAVRA EM PORTUGU 

ES : 
530 PRINTTAB(IO) "- SUBSTITUA O NUMERO DA LINHA, Q 

UE VEM APOS '©', SEPA-RADA DESSE POR UMA VIRG 

ULA, PELA PALAVRA EM PORTUGUES" 
535 PRINTTAB(5) "4. INTRODUZA O SIMBOLO '•' APOS A 

PALAVRA EM PORTUGUES, SE-PARADO POR UMA VIRGU 

LA. 
540 PRINTTAB(5) "5. INTRODUZA O NUMERO DA LINHA EM 

QUE VOCE ACABOU DE INTRODUZIR OS DADOS APOS O 

SIMBOLO '©', SEPARADOS POR UMA VIRGULA. 
545 PRINTTAB(5) "6. SAIA DO MODO DE EDICAO. 
550 PRINTTAB(5) "7. GRAVE ('CSAVE') A VERSAO AMPLI 

ADA DO 'TRADUTOR*. 
555 GOSUB600:END 

599 i* * * SUBROTINA 'PAUSA' * * * 

600 PRINT©986,"(PRESSIONE <ENTER> PARA CONTINUAR. 

. • ) " ; 
605 IK=INKEY$:IFIK=""THEN605ELSEIFIK=CHR$(13)RETU 

RNELSE605 

609 '*** SUBROTINA 'MENU' * * * 

700 CLS : PRINT: PRINT : PRINT: PRINT : PRINTTAB ( 5) "VOCE 
DESEJA: 

705 PRINT :PRINTTAB( 10 ) "1. TRADUZIR PALAVRAS; 

710 PRINTTABdO) "2. INTRODUZIR NOVAS PALAVRAS; 

715 PRINTTABdO) "3. ENCERRAR A CONSULTA. " ; 

720 PRINT®995,"(ESCOLHA A OPCAO 1, 2 ou 3.)"; 

725 IK=INKEY$:IFIK=""THEN725 

730 IFIK="1"THEN300ELSEIFIK="2"THEN500ELSEIFIK="3 
"THEN740ELSE725 

740 END 

1000 DATA HOUSE, CASA, BLACK, PRETO, YELLOW, AMARELO,C 
OW,VACA, WHITE, BRANCO, HORSE, CAVALO, BIRD, PASSA 
RO , GREEN , VE RDE , B ROWN , MARRON , WATE R , AGUA , BALL , 
BOLA , SHOE , SAP ATO , TROUSERS , CALCAS , SNAKE , COBRA 
, MAN ,HOMEM,WOMAM, MULHER, BOOK ,LIVRO, DOG, CACHO 
RRO , CAT , GATO , FLOOR , CH AO , WAVE , ON DA 

1002 DATA WINTER, INVERNO, SUMMER, VERAO, AUTUMN, OUTO 
NO, SPRING, PRIMA VERA, JANUARY, JANEIRO, FEBRUARY 
,FEVEREIRO, MARCH, MARCO, APRIL, ABRIL, MAY, MAIO, 
JUNE , JUNHO , JULY , JULHO , AUGUST , AGOSTO , SEPTEMBE 
R, SETEMBRO , OCTOBER, OUT UBRO , NOVEMBER , NOVEMBRO 
, DECEMBER, DEZEMBRO 

1004 DATA MONDAY, SEGUNDA-FEIRA, TUESDAY, TERCA-FEIR 
A, WE DNESDAY,QUARTA-FEIRA, THURSDAY, QUINTA-FEI 
RA , FRIDAY , SEXTA-FEI RA , SATURDAY , SAB ADO , SUNDAY 
, DOMINGO, TABLE, MESA, DOOR, PORTA, WINDOW, JANE LA 
.TREE ,ARVORE , ONE , UM, TWO , DOIS , THREE , TRES , FOUR 
,QUATRO, FIVE, CINCO, SIX, SEIS 

1006 DATA SEVEN, SETE, EIGHT, OITO, NINE, NOVE, TEN, DEZ 
,ELEVEN,ONZE, TWELVE, DOZE, THIRTEEN,TREZE, FOUR 
TEEN , QUATORZE , FIFTEEN ,QUINZE , SI XTEEN , DEZESSE 
IS, SEVENTEEN, DEZESSETE, EIGHTEEN, DEZOITO, NINE 
TEEN, DEZENOVE, TWENTY, VI NTE , HOME, LAR, PENCIL, L 
APIS , RUBBER, BORRACHA , RULER , REGUA 

1008 DATA BED, CAMA, CHAIR, CADEIRA, GLASS, COPO,YESTE 
RDAY,ONTEM, TOMORROW, AMANHA, FISH, PEIXE,©, 1008 



nonimos). Mediante pequenas modificacoes, inclusive, a tra- 
ducSo podera ser feita de uma para diversas linguas. 

OPERACAO 

Ao ser rodado, o programa fornece ao usuario um quadro 
de opcOes: 

• Traducao de palavras 

• Introducao de novas palavras no vocabulario 

• Encerramento do programa 

Na opcao Traducao, e solicitado ao usuirio entrar com a 
palavra a ser traduzida, a qual sera" comparada com cada pala- 
vra do vocabulario. Encontrando-se o seu par, ambas aparece- 
ra"o no video: a palavra a ser traduzida e a sua traducao. 

Caso a palavra solicitada nao faca parte do vocabulano 
atual, isto serd informado ao usuirio atrave's de mensagem 
apresentada no video. Logo a seguir vem o quadro de opcoes. 
Este 6 o momento mais adequado para o acr^scimo de novas 
palavras, pois a opcao Introducao de novas palavras informara. 
inclusive, o numero da linha onde o acr^scimo deverd ser feito 
(se esta linha )£ estiver com sua capacidade esgotada, deverd 
ser criada uma nova, encerrando as inclusoes com o simbolo 
@ , seguido de uma virgula e do numero da linha atual). 

Na opca"o de Encerramento, o programa € simplesmente 
desviado para o final (END). ■ 



Engenheiro Eletrdnico, graduado em 1973 pela E.T.F.C.S.F., No 
D' 'Aquino New 4 responsive! pela expansSo e implantapSo do sistema 
ue telesupervisBo dos equipamentos de transmissao, comutaqSo, forge e 
redes na TELESC - Telecom unicagdes de Santa Catarina S. A. 
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CURSOS DE MICROCOM PUTADORES 

• Introducao aos Microcomputadores 

• Linguagem Basic 

• Tecnicas Digitals 

• Microprocessadores 8080/8086 

• Microprocessador Z»0 

• Microprocessador 6800 

• CP/M 

• Cursos para Empresas 




CENTRAL DE INFORMACOES 393-4585 



Seu vocabulario esta em dia? Este jogo para o Apple, similar ao famoso Mastermind, ira testar isto ! 



Masterword: 
descubra a palavra 



Rubens Hungria de Lara 



u 



ma das caracten'sticas que mais 
me impressiona no BASIC, e 
particularmente no Applesoft 
(o BASIC do Apple II), 6 a sua capaci- 
dade de manusear cadeias de caracteres, 
as chamadas strings. Por esse motivo, 
uma das pnmeiras aplica^es que me 
ocorreu foi programar urn jogo de pa- 
lavras que conheci nos tempos de estu- 
dante de Engenhana e que preen cheu 
longas aulas de mate"nas na"o exatamente 
agraddveis. 

Masterword 6 urn jogo simples, si- 
milar ao Mastermind, so que utiliza le- 
tras ao Hive's de numeros. Escnto para 
o Apple e denvados (Unitron AP-II, 
Maxxi, Microengenho), ele pode ser fa- 
cilmente convertido para outros micros, 
pois e documentado atrav^s de RE- 
MARKS que separam as principals ro- 
tinas, con forme pode ser observado na 
list age m 1 . 

Neste jogo, o competidor deve adi- 
vinhar uma palavra de cinco letras, sen- 
do que nenhuma 6 repetida, seleaonada 
pelo computador. A cada tentativa do 
jogador, o computador respondera 
quantas letras estfo certas e quantas es- 
ta"o certas e no lugar certo. Assim, o jo- 
gador deve lr construindo palavras ati 
descobrir a escolhida pelo computador. 
Existem tres niveis de dificuldade para 
chegar-se a palavra certa - 10, 7 e 5 ten- 
tative -, de acordo com o ni'vel do jo- 
gador - pnnapiante, mtermedidno e 
profissional, respectivamente. 

Vejamos agora algumas caracten'sti- 
cas do Masterword. As principals va- 
ndveis utilizadas sao F% e D%, valores 



de frequencia e duracfio do som utiliza- 
do na rotina de resultado fmal. Esta ro- 
tina 6 carregada na hnha 95 e escrita em 
linguagem de miquina, como mostra a 
listagem 2. £ uma rotina opaonal e, se 
desejado, pode ser excluida, orrutindo-se 
as lmhas 95, 3220, 3320 e as sub-rotinas 
3500 e 4000 da listagem 1 . 

NMAX e" o numero de palavras exis- 



tentes no banco de palavras e AMAX 
o numero de letras por palavra, defini- 
das como 60 e 5. respectivamente, mas 
que podem ser aJteradas. P$ e o array 
de palavras e T$, o array de tentativas 
feitas. 

O banco de palavras estd defmido da 
hnha 9050 a hnha 9160 e pode ser alte- 
rado conforme a sua imaginacao. 



TENTATIVAS RESULTADOS 
ESTOU EBPERANDO A SUA PALAVRA — ; 7FUNG0 

1. F U N G O 0,0 

ESTOU ESPERANDO A SUA PALAVRA — >?VINHO 

2. V I N H O 2,0 

ESTOU ESPERANDO A SUA PALAVRA — >?FILHA 

3. F I L H A 3,1 

ESTOU ESPERANDO A SUA PALAVRA — >?CHEIA 

4. C H E I A 5,5 

PARABENS RUBENS - VOCE GANHOU ! ! 
VOCE ACERTOU EM 4 TENTATIVAS 
ATE A PRO X IMA 
ALQUEM MAIS QUER JOGAR? 
TECLE 'SIM' — >?N 

FIM'DE'JOGU 



Figura 1 - Um exemplo do jogo. Apds cada tentativa do jogador, o computador responde, 
atravis do primeiro cardter, quantas letras estdo corretas e, pelo segundo cardter. quantas es- 
tad certas e no lugar certo, ate" que voce forme a palavra escolhida e termine o jogo. 
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Listagem 1 — Masterword 



1 REM ♦♦♦••••**»♦*##*»»#♦»*•»* 

2 REM • MASTERWORD * 

3 REM • # 

4 REM • RUBENS H. DE LARA • 
3 REM » R AFONSO PEDRAZI 333 » 

6 REM • 18100 SOROCABA SP • 

7 REM * <0132) 33-1871 # 

8 REM •••»♦»•»**#»♦»»♦»*»*#*«# 
10 CLEAR 

20 DIM F7. (20) ,D7.<20> 

30 FX(1) » 56: D7. (1) - 7:F7.(2) - 8 

9:DX(2> - 4 

31 FX(3> - 212:DX(3> - 5:FX(4> - 

67:DX(4> - 6 

32 FX(5> - 210: DX (3) - 9:FX(6> ■ 

45:DX(6) * 8 

33 FX(7) - 69:DX(7) » 4:FX<8) - 5 

6:DX(8> = 7 

34 FX (9) ■ 210: DX (9) - 9:FX(10) - 

18:DX(10> - 22 
45 HOME 

50 NMAX - 60:TMAX - 5 
60 DIM P»(NMAX): DIM A (NMAX) 
70NIVEL»<1) = "PRINCIPIANTE":CH( 

1) » 10 
90 NIVEL»(2> - " INTERMEDIARY" :CH 

<2) - 7 
90 NIVEL«(3) = "PROFISSIONAL":CH( 

3) - 3 
93 PRINT CHR» <4);"BL0AD MASTER 

WORD.SOM" 
100 GOSUB 9000: REM CARREGA BAN 

CO DE PALAVRAS 
200 GOSUB 1000: REM CABECALHO 

300 HOME : GOSUB 1200: REM ESCO 
LHA RANDOM I CA DE PALAVRA 

400 GOSUB 1500: REM TELA INICI 
AL 

3O0 REM CORPO DO PROGRAMA 

505 VTAB 5 



510 


PRINT " TENTATIVAS R 




ESULTADOS": PRINT 


520 


K = K + l: REM K=NO. TENT AT I 




VAS 


530 


V - (4 ♦ (2 « K) > 


535 


VTAB V 


540 


PRINT "ESTOU ESPERANDO A SUA 




PALAVRA — >"; 


550 


INPUT T«: IF LEN <T«> > TMA 




X THEN 530 


555 


VTAB V 


557 


PRINT " 



560 SPEED- 50 

570 VTAB V: HTAB 2 

580 INVERSE : PRINT K| 

590 NORMAL : PRINT " . "| 

600 FOR I - 1 TO LEN (T«> 

610 PRINT MID» <T«,I,1>|" "| 

620 NEXT I 

630 SPEED- 255 

640 FOR PAUSE - 1 TO 500: NEXT P 

AUSE 
650 GOSUB 3000 
660 HTAB 23 
670 PRINT X| H , "|V 
680 IF Y - TMAX THEN GOSUB 3300 

: GOTO 700 
685 GOSUB 3200 
687 IF Z - 2 THEN GOTO 700 
690 GOTO 520 
700 GOSUB 3400 
710 GOTO 300 
1000 REM CABECALHO 
1010 VTAB 1 
1020 PRINT "*###»«*###*•»•*»#»** 

1030 PRINT "## M A S T E 

R W R D ••" 
1040 PRINT "*•**•*••*•«••»«•**** 



1050 
1060 
1200 

1210 
1220 

1230 
1240 
1300 

1310 
1320 

1330 
1340 
1350 
1360 
1370 

1380 
1390 

1400 
1410 
1500 
1310 



POKE 34,3 

RETURN 

REM ESCOLHA RANDOM I CA DA P 
ALAVRA 
IX - 1 ♦ ( RND (1) ♦ NMAX) 

IF A (IX) - THEN A (IX) - 1 
:x« - P*(IX): GOTO 1240 

GOSUB 1300 

RETURN 

REM PESQUISA SEQUENCIAL DE 

PALAVRA ATIVA 
I ■ 1 

IF A(I) = THEN A(I) * l:X 
• = P«(I>: GOTO 1510 
I ■ I ♦ 1 

IF I < NMAX THEN 1320 

HOME 

HTAB 15: VTAB 15: FLASH 

PRINT "BANCO DE PALAVRAS ES 
GOT ADO": NORMAL 

PRINT : PRINT : PRINT 

PRINT "PARA RE INICIAR TECL 
E 'RUN' " 

END 

RETURN 

REM HELLO SCREEN 3 



VTAB 5: PRINT 
BEM?" 
1520 PRINT " 



OLA ,TUD 



1530 
1540 



1550 
1560 



1579 
1580 



1585 



PRINT 

PRINT TAB( 4)"ESTE E O JOG 
O DO MASTERWORD" 



PRINT 
INPUT 
OME» 
PRINT 
PRINT 



: HTAB 5 

"ENTRE SEU NOME— >• 



IN 



: HTAB 5 

"VOCE OUER INSTRUCOES 



, ";NOME«|"?" 
PRINT : HTAB 



1390 INPUT "TECLE S OU N — >"JSN« 



t 







SCHUMEC 



Profissional - Cientffico 

CPU 8085 a 6. 144 MHZ 64 KB de RAM 

ate 4 diskettes de 8" Padr3o IBM 3740 

e 4 discos rigidos de 6 ou 12 M Bytes 

Impressora ate 160 CPS 

totalmente modular 

CPU de 16 Bits 

com 256 Kbytes de RAM e sistema 

multiusuario 

O micro Nacional de categoria 
Intern acional 

Maior desempenho com menor custo 
na sua faixa de mercado (Prologica 
S-700. Quartzil. COBRA 305) 



Aplicativos especialmente 
desenvolvidos para a real necessidade 
de sua empresa 
Utilitarios 



V 







KALHAU ENGENHARIA LTDA. 

Praca Tiradentes, 10/402 (021) 252-2752 
Cep. 20.060 - RJ ■ Das 8:00 hs as 22:00 hs 
Sabado 8:00 hs • 17:00 hs. 



• TK 83 e TK 85 

• JR da SYSDATA 

• Jogos 

• Comercializac.ao de programas de 
terceiros 

• Perifericos 

• Acessorios (Diskettes, Formularios, etc.) 

• Livros e revistas tecnicas 

• Mobiliario para seu micro 

• Treinamento especial para empresas 

• Financiamentos e Leasing 

• Despachamos para todo Brasil 
Garantimos os melhores precos e 
formas de pagamento da pra^a 
(Antes de comprar nao deixe de nos 
consultar) 




A 



DIGITUS 



Pessoal e Semi- Profissional compativel 
com TRS-80 CPU Z80A a 2.5 MHZ 

Sistema modular 

Interface para cassetes de alta 

velocidade e ate 4 diskettes de 5 1/4" 



CPM com 64K RAM 
Alta resolugao de video 

Testes efetuados pelas revistas 
especializadas comprovam seu grande 
desempenho na sua faixa (DISMAC 
D-8000, CP 500, NAJA) 

CURSOS 

• Basic e Basic Avan<;ado 

• CPM /DOS 

• Assembler 
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31 



MASTERWORD: DESCUBRA A PALAVRA 



1600 IF SN» < > "S" AND SN» < > 

"N" THEN 1585 
1610 IF SN» ■ "S" THEN GOSUB 18 

00 
1620 VTAB 16: HTAB 5 
1630 PRINT "QUAL E SEU NIVEL ? 



1640 
1650 



1660 
1670 



1680 
1690 



1700 
1710 
1720 

1730 

1735 
1740 
1800 
1805 
1810 
1820 

1822 

1824 

1830 

1840 



HTAB 
'TECLE 



2 OU 3 — >" 



THEN 16 



: HTAB 5: PRINT "LEMB 

: HTAB 2: SPEED- 20 
"SE VOCE E "; NIVEL* (N 
;CH(N7.);" CHANC 



HTAB 31 

PRINT "BOA SORTE' ■ 



PRINT 
INPUT 
INI 

IF NX > 3 OR NX 
20 

PRINT 
RE-SE 

PRINT 

PRINT 
X>|" "|"TEM 
ES" 

SPEED= 255 

PRINT 

FLASH 

NORMAL 

FOR PAUSE = 1 TO 2000: NEXT 
PAUSE 

HOME 

RETURN 

REM TELA DE HELP 

HOME 

VTAB 6: HTAB 2 

PRINT "ESTE JOGO CONSISTE E 
M VOCE ACERTAR UMA" 

PRINT "PALAVRA DE 5 LETRAS 
ESCOLHIDA PELO APPLE" 

PRINT "A CADA TENT AT I VA ELE 

RESPONDERA : " 

HTAB 5: PRINT "A.O NUMERO D 
E LETRAS QUE EXISTE NA" 

HTAB 7: PRINT "PALAVRA ESCO 
LHIDA" 



SUPPLY 



EM PD, TUDO 
O QUE VOCfe 

NECESSITA NUM 
S6 FORNECEDOR! 

E a Sappty nao tern apenas todo e qualquer li- 
po de material para CPD"s. Tern lambem os 
melhores precos e a mais rapida entrega. Isso 
porque a Sapply lem urn estoque completo das 
melhores marcas exlstentes no mercado. po- 
dendo assim alender — com a mesma eficien- 
cia — desde empresas de grande porte ate pe- 
quenos consumidores. 

Se o seu problema (or suprimentos para Proces- 
samento de Dados, preco ou prazo de entrega. 
consulle antes a Supply. 

Voce far* bona negocioa « boa* aattao*. 



<sm$uppn 



Suprimentos e Equipamentos para Proces 

samento de Dados Ltda. 

Rua Padre Leandro, 70 — Fonseca 

CEP 24120 — Tel.: 722-7937 Niterbi — RJ. 



OUTROS EST ADOS: 

Pernambuco, Rio Grande do Node e Parai 
ba: Filial Recife: (081) 431-0569 — Alagoas 
CORTEC: (082) 221-5421 — Ceara: DATA 
PRINT: (085) 226-9328 — Mato Grosso: FOR 
TALEZA: (067) 382-0173 



1850 HTAB 5: PRINT "B. NUMERO 

DE LETRAS QUE ESTAO NA" 
1855 HTAB 5: PRINT "POSICAO CORR 

ETA" 
1860 HTAB 5 
1870 PRINT " A RESPOSTA SERA NA 

FORMA A,B " 
1880 PRINT : HTAB 4 
1890 PRINT "VOCE PODE ESCOLHER 3 

NIVEIS DE DIFI-" 
1900 PRINT SPC( 3>"CULDADE CONF 

ORME O NUMERO DE TENTATI-" 
1910 PRINT SPC( 5)"VAS A QUE VO 

CE TERA DIREITO: " 
1920 PRINT 
1930 PRINT SPC( 7) "1-PRINCIPIAN 

TE - 10 TENTATIVAS" 
1940 PRINT SPC( 7) "2- INTERMEDIA 

RIO - 7 TENTATIVAS" 
1950 PRINT SPC( 7) " 3-PROF I SS I ON 

AL - 5 TENTATIVAS" 

1955 PRINT 

1960 PRINT "PARA CONTINUAR APERT 

E QUALQUER TECLA"; 
1970 GET Z»: HOME 
1980 RETURN 

3000 REM CALCULA RESULTADO 
3005 Y = o:x - 
3010 FOR I - 1 TO LEN <T»> 
3020 IF MID* <X*,I,1) ■ MID* ( 

T», 1,1) THEN Y - Y ♦ 1 
3030 NEXT I 

3040 FOR I - 1 TO LEN <T*> 
3050 H = 

3060 FOR J - 1 TO LEN <T*> 
3070 IF MID* <T*,I,1> - MID* ( 

X*,J, 1) THEN H = 1 
3080 NEXT J 

3090 IF H ■ 1 THEN X - X + 1 
3100 NEXT I 
3110 RETURN 

3200 REM ROTINA DO PERDEDOR 
3210 IF K < CH(NX) THEN Z = 1: GOTO 

3280 
3220 GOSUB 3500: REM ROTINA DE 

SOM 
3225 Z - 2 
3230 HOME 
3240 VTAB 12: HTAB 7: PRINT "VOC 

E PERDEU "j NOME* 
3250 VTAB 14: HTAB 7: PRINT "A P 

ALAVRA ERA "5 
3260 INVERSE : PRINT X*: NORMAL 

3270 VTAB 16: HTAB 8: PRINT "ATE 

A PROXIMA" 
3280 RETURN 

3300 REM ROTINA DO GANHADOR 
3310 GOSUB 3500 
3315 FOR PAUSE = 1 TO 1000: NEXT 

PAUSE 
3320 HOME 

3325 VTAB 10: HTAB 7: PRINT "PAR 
ABENS ":NOME*;" - VOCE GANH 
OU! ! M 

VTAB 13: HTAB 7: 
E ACERTOU EM "JK; 
S" 
VTAB 16: HTAB 8: PRINT "ATE 
A PROX I MA- 
RETURN 

REM FIM DE JOGO 
VTAB 21: HTAB 5 
PRINT "ALQUEM MAIS QUER JOG 
AR7 " 

VTAB 23: HTAB 7: PRINT " TE 
CLE 'SIM'— >"; 
INPUT S* 

IF S* a "SIM" THEN K - 0: GOTO 
3450 

VTAB 24: HTAB 29: 
"FIM DE JOGO 



3330 



3350 

3360 
3400 
3410 
3415 

3420 

3425 
3430 

3440 



PRINT "VOC 
" TENT AT I VA 



FLASH : PRINT 
NORMAL : END 



3450 RETURN 

3500 REM ROTINA DE SOM 

3510 FOR I = 1 TO 10 



3515 F - FX(I) 

3516 D = DX(I) 
3540 GOSUB 4000 
3550 NEXT I 
3560 RETURN 

4000 REM ACIONADOR DE FALANTE 

4100 POKE 768, D 

4200 POKE 769, F 

4300 CALL 770 

4400 RETURN 

6002 END 

9000 REM CARREGA BANCO DE PALAV 

RAS 
9010 FOR P «= 1 TO NMAX 
9020 READ P*(P) 
9030 NEXT P 
9040 RETURN 
9050 DATA ISTMO, PILHA, PRATO, PIN 

TO.PRUMO 
9060 DATA CRAVO, LAPIS, GERAL, GRU 

PO.CALOR 
9070 DATA UNIAO.CURSO, FILHO, MEN 

TA.FATOR 
9080 DATA TRAGO, GANSO, X ISTO, VAC 

UO,VADIO 
9090 DATA BRUMA , MELRO , PRETO , ALU 

NO, PORTA 
9100 DATA BAIXO,BEIJO,FEUDO,LAP 

SO.CAPUZ 
9110 DATA MUNDO,CHUVA,CHAVE,CHE 

IA.POETA 
9120 DATA COBRA, SABER, F AC I L, PAD 

RE.FRASE 
9130 DATA DEBIL, VERSO, DIGNO,HIA 

TO, EXTRA 
9140 DATA FECHO,FORCA,FELIZ,GRU 

TA.FEROZ 
9150 DATA VELHA, VETOR, URINA, RAD 

IO.USINA 
9160 DATA ULTRA, SIGNO, SIGLA, ASI 

LO.PISTA 





Li st a gem 2 






RotinadeSom 




DCALL- 


151 










♦302L 












0302- 


AC 


01 


03 


LDY 


♦0301 


0305- 


AE 


01 


03 


LDX 


•0301 


0308- 


A9 


04 




LDA 


#*04 


030A- 


20 


A8 


FC 


JSR 


SFCA8 


030D- 


AD 


30 


CO 


LDA 


•C030 


0310- 


E8 






INX 




0311- 


DO 


FD 




BNE 


♦0310 


0313- 


88 






DEY 




0314- 


DO 


EF 




BNE 


♦0305 


0316- 


CE 


00 


03 


DEC 


•0300 


0319- 


DO 


E7 




BNE 


♦0302 


0318- 


60 






RTS 




031C- 


20 


20 


70 


JSR 


•7020 


031F- 


08 






PHP 




0320- 


IB 






CLC 




0321- 


D8 






CLD 




0322- 


88 






DEY 




0323- 


08 






PHP 




0324- 


AO 


AO 




LDY 


»*A0 


0326- 


10 


38 




BPL 


•0360 

■ 



Rubens Hungria de Lara e" formado em Enge- 
nharia Eletrdnica pelo IT A e trabalha em pro- 
cessamento de dados nas a"reas de ana" Use e ge 
rSncia de sistemas desde 1972. 
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Max xi r o micro pessoal mutto 

prof i ssiona I da PoLvmax, 




O Maxxi e um microcomputador pessoal — profissional de grande versatilidade 
e assegurada possibilidade de expansio. Compativel com APPLE II 
PLUS*, aceita mais de 5 mil programas aplicativos disponiveis no mercado. 
Sua caracterfstica padrao inclui um monitor e linguagem Polysoft Basic, ambas 
gravadas em ROM, com 2 kbytes e 10 kbytes, respectivamente, 48 kbytes de 
membria RAM disponiveis para o usuario; interface para gravador cassete, 
video e tv colorida (sistema PAL-M); teclado padrao ASC II e fonte de 
alimentacao, dispostos em um gabinete proprio. 

Veja aqui sua essem ia tecnica: 

Mkrroprocessador 

6502 operando com frequencia de 1 MHZ. 

Video 

O Maxxi possui um video profissional de 12" com fosfatizacao verde e pode 
conectar-se tambem com uma televisao comum (colorida ou preto & branco), 
operando no modo texto ou grafico (baixa ou alta resolucao), sendo 
completamente transparente ao usuirio o acesso a mem6ria. No modo grafico, 
as ultimas 4 linhas do video operam no modo texta Todos os modos de 
operacao com o video sao selecionaveis por Software. 
Modo Texto 

• 40 caracteres/linha, 24 linhas. 

• Caracteres 5x7 

• Video normal, reverso e piscante. 

• Controle pleno do curso. 
Modo Grafico 

(baixa resolucao) 

• 40h x48vou40h x40v com 4 linhas de texto. 

• 16 cores selecionaveis por Software. 

• Comando especificos do Polysoft Basic para uso 

do Modo Grafico: COLOR, PLOT, HUN, VLIN, SCRN. 
(alta resolucao) 

• 280 h x 192 v ou 280 h x 160 v com 4 linhas de texto. 

• 6 cores selecionaveis por Software. 

• Comandos especificos do Polysoft Basic para uso no modo 
grafico: HCOLOR. HPLOT. 

• Imagem do video residente em 8 kbytes. 



Agora vamos 

processar os dados 

tec nicos dele. 

Memoria 

A membria dinSmica RAM e organizada em 3 incrementos de 16 kbytes cada 
um, num total de 48 kbytes totalmente disponiveis para o usuario. Esta 
mem6ria pode ser aumentada conforme a necessiaade do usuario adicionando 
placas de expansao. Possui tambem 10 kbytes de ROM para armazenamento 
do Polysoft Basic e 2 kbytes de ROM para o sistema monitor. Sistema de 
"Refresh" automitico, completamente transparente. Membria r^pida — tempo 
de acesso de 350 ns. 

Entrada e Saida 

O Maxxi inclui um teclado com padrao ASC II; interface para gravador cassete, 
video e tv colorida sistema PAL-M; um conjunto de 8 conectores para a ligacao 
de cartoes controladores de perifericos e expansoes; 3 entradas de 1 bit, 4 
entradas analogicas para conexao de "joystick" e 4 saidas digitais de 1 bit. 

Polysoft Basic 

Possui caracteristicas basicas do padrao Basic com tecnicas de forma a propiciar 
maximo rendimento dos recursos de Software do produto. 

Monitor 

Gravado em ROM com 2 kbytes. 

Perifericos e acessorios disponiveis 

O Maxxi de concepcao modular, cresce de acordo com os perifericos a ele 
incorporados, dentre os quais destacamos: TV comum, a cores ou preto & 
branco — Monitor profissional Polymax de 12" com fostatizacao verde — 
Unidade de drives de disquetes de SV*", organizado com 25 trilhas, 16 setores 
de capacidade de 256 bytes cada um — Unidade de gravador cassete — 
Interface serial para impressora — Impressora Polyprint 90 CPS de 80/132 
colunas — Controladores de jogos — Interface serial para comunicac5o de 
dados — Modem — Placa de expansao de membria RAM para 64 kb — Placa 
de CPU Z-80 (sistema operacional CP/M) — Placa Videx expansora de video de 
40 para 80 colunas — modulador de R.F. 



• ( )utros produtos da Polymax: 

• POLY 301 WP (Polyscribi) 

• POLY 201 DP • POLY 105 DP 

• POLY 201 DE • POLYNET 




- 
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Programe jogos animados com complexos efeitos-e ouca exc/amacoes do tipo: Mas isto foi feito em BASIC ! ? 



Anime-se... efacabons 
jogos em BASIC 



Renato Sabbatini 



u 



ma das caracten'sticas mais fascinantes do microcom- 
putador pessoal e a nqueza de recursos e a facilidade 
de programacSo que a maiona dos modelos existentes 
oferece para a reahzac^ao de jogos e entretenimentos bastante 
sofisticados e excitantes. Na reabdade. a possibihdade de ter 
uma maquina de fliperama em casa e um dos motivos mais co- 
muns que levam muitas pessoas. desde garotos ate sizudos exe- 
cutivos de terno e gravata. a comprarem um micro para suas 
casas. 

Os pnmeiros micros pessoais surgidos no mercado dispu- 
nham de caracten'sticas extremamente sofisticadas em relacao 
a computadores de maior porte. Alguns destes recursos (como 
os graficos. por exemplo) podiam ser obtidos apenas a custos 
extremamente altos nos computadores ate entao existentes. 
Entretanto. uma nova gerac,ao de microcomputadores. hoje em 
evidencia no mercado brasileiro (denvados do Apple II amen- 
cano, por exemplo). vem adicionar recursos ainda mais podero- 
sos, que foram colocados propositadamente para a lmplemen- 
tac,ao de jogos muito mais sofisticados e similares aos dos fli- 
peramas: graficos colondos de alta resolucSo. ammacao grafi- 
ca, produijao de rui'dos. sons e miisica, alavancas de controle 
(joysticks), etc. O sucesso destes computadores pode ser me- 
dido pelas longas filas de entusiastas, em recentes expos^oes 
de micros, esperando a vez de jogar o Pacman. Formula I. 
Asteroidesetc. 

Infelizmente, a complexidade aparente e a pirotecnia vi- 
sual e sonora de muitos destes jogos levam as pessoas a pensar 
que programar um bom jogo no microcomputador e algo ao 
alcance apenas de alguns genios malucos. destes que passam 27 
horas por dia nesta atividade. 

Outro tipo de engano muito comum. mesmo entre progra- 
madores que se dizem expenmentados. e pensar que os jogos 
de ac^o rapida, que exigem grande habilidade manual ou mos- 
tram ammacoes graficas complexas, podem ser apenas progra- 
mados em hnguagem de maquina ou usando. diretamente, um 
Assembler, ambos muito difi'ceis de serem aprendidos por nao 
profissionais do teclado. 

Neste artigo. pretendo mostrar que. sabendo-se alguns tru- 
ques de programacao e utilizando-se ao maximo os recursos 



mesmo de maquinas mais simples (como o TRS-80 ou simila- 
res), qualquer programador mediano pode desenvolver, em 
BASIC, jogos surpreendentemente rapidose complexos. 

INGREDIENTES DE UM BOM JOGO 

Quais sao os ingredientes basicos de um jogo de sucesso no 
microcomputador? Esta receita tern mudado bastante. a medi- 
da que os jogos evoluem. Antigamente. ou seja, ha tres anos atras. 
qualquer jogo que dialogasse com o usuano ou fizesse alguns 
graficos modestos era fanaticamente espalhado por todos os 
micros. Hoje em dia. fazem sucesso apenas os jogos de frene- 
tica ac^ao visual, mterac^o complexa. som e outros recursos. 

No entanto. todos os jogos de sucesso tern em comum ape- 
nas cinco coisas: 

• continuidade - fluxo ou suspense do jogo; o que mantem a 
atencao, a concentrac^ao e a motivac^o do usuano durante to- 
do o seu desenvolvimento. £ o que faz o jogador ficar grudado 
no computador e perder a nocao de tempo! 

• desafio - o que e oferecido na forma de competi^ao. des- 
treza manual, dificuldade intelectual ou uma combinacao de 
todos estes. 

• criatividade - uma combinac^ao de novidade do jogo, on- 
ginahdade de abordagem e soluc,6es, etc. 

• imagina^o - uso de apelos hist6ncos ou de fantasia, ele- 
mentos tirados da mitologia, aventuras famosas, fic^So cien- 
ti'fica, histona em quadnnhos, etc; inclusao de recursos de 
imagem e som e outros tipos de venenos. 

• interacao - velocidade, habilidade, competicao contra o 
computador, dialogo rapido, envolvimento de dois ou mais 
jogadores etc. 

Estas exigencias podem ser enfrentadas com tranquihdade, 
se soubermos alguns macetcs de desenvolvimento, os quais 
incluem: metodologia de planejamento; programa?ao e teste, 
e as te'cnicas de programacio que possibihtem a exploracjlo 
maxima dos recursos da maquina e a realizacao de alguns 
truques mais comuns. 
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DESENVOLVENDO JOGO 

O elemento fundamental de qualquer jogo de sucesso. abas, 
de qualquer programa de computador. i o planejamento. Este 
tern tres fases distintas que devem ser seguidas com o maximo 
de ngor e cuidado, por parte do programador: 

1 . OBJETIVOS: todo jogo parte de uma ideia. Escreva-a! Co- 
loque no papel os objetivos e caracteristicas basicas que voce 
deseja ver no jogo, regras de utilizaca'o, recursos a serem utih- 
zados etc. 

:. PLANEJAMENTO DO ALGORJTMO: identifique todas as 
partes que o programa devera ter para atingir os objetivos. Di- 
vida as tarefas basicas em modulos pequenos, separados (sub- 
rotinas. por exemplo), de tal modo que possam ser testados 
isoladamente, antes de serem incorporados ao programa. Dese- 
nhe um fluxograma geral e depois um mais detalhado dos pas- 
sos que o programa devera seguir. fluxograma auxilia o de- 
senvolvimento e o teste mais eficiente de modulos muito com- 
plexes. Faca tambem uma tabela de todas as rotinas e vana- 
veis que o programa devera usar. 

3 PLANEJAMENTO DOS TESTES: delineie, para cada mo- 
dulo, um conjunto de testes com dados conhecidos. cobnndo 
exaustivamente todas as vanac5es, mesmo as mais absurdas. 
que poderao ser encontradas. Coloque na programacao. bnhas 
de teste ou comandos, para mostrar resultados parciais de cal- 
culos. Estas linhas podem ser retiradas postenormente. quan- 
do o programa estiver funcionando corretamente. 

Segundo todos os experts do ramo. o planejamento do pro- 
grama deve ser up-doun, ou seja. de cima para baixo. Comece 
estipulando a funcSo global do programa, depois quebre-a em 
subfuncOes separadas e menores. estas em sub-subf uncoes, e 
asam por diante. Identifique todos os modulos necessanos e 
os basicos que serao usados por muitos outros. 

O desenvolvimento (a codificacao propnamente dita), en- 
tretanto. deve ser preferencialmente de baixo para cima. isto 
e, bottom-up. Comece programando e testando as sub-rotinas 
mais elementares, depois os modulos que usam uma ou mais 
sub-rotinas, ate" chegar na montagem final do programa. 

A estrutura do programa tern muito a ver com as caracte- 
n'sticas da linguagem em que e programado. Um programa que 
sera compilado (em FORTRAN, por exemplo). ou mterpreta- 
do (BASIC), tern estruturas bastante diferentes, para conseguir 
maior eficiencia. Como estamos nos refenndo a programacao 
em BASIC para microcomputadores. vamos pnmeiro definir os 
elementos desejaveis de presteza do jogo: 

• velocidade: deve ser a maior possivel. Se quisermos reduzir 
a velocidade em um ponto qualquer do programa. basta colo- 
car algumas alc^as de espera (loops). Isto e bem mais facil do 
que tentar aumentar a velocidade depois de programado. 

• uso de pouca memoria - jogos complexos exigem progra- 
mas grandes. Estes sao difi'ceis de programar, de corngir e de 
colocar na memoria kmitada do micro. 

• uso de recursos adicionais — som, ammac/o grafica, alavan- 
cas. teclado etc. 

Se juntarmos tudo isto, veremos que a estrutura interna do 
programa. isto e, as suas partes e a ordem em que sao coloca- 
das. muitas vezes nada tern a ver com a estrutura e a ordem de 
execucSo. Um jogo ti'pico sena executado na seguinte sequen- 
ce: mostrar ti'tulo e mstrucdes do jogo: pedir nome(s) do(s) 
jogador(es), parametros ou opcSes miciais (por exemplo grau 
de habilidade); executar o jogo ate o objetivo ou final dese- 
jado: mostrar resultados, colocar nome do jogador na bsta dos 
recordes etc. 

Entretanto, para conseguir maior velocidade em BASIC, a 
estrutura interna do programa tena que ser assim: 
1. Chamar uma sub-rotina ou desviar para o Fim do programa, 
para miciabza^o (dimensionar, definir tipos de vanaveis, ler 



conjuntos DATA, definir parametros iniciais e constantes, 
mostrar ti'tulos e instrucCes). Por que estes segmentos devem 
estar fisicamente ao final ao programa? Porque o interpretador 
BASIC, cada vez que encontra no programa um desvio para 
uma hnha qualquer. tern que percorrer linearmente todo o pro- 
grama, desde o mi'cio. ate encontrar a bnha desejada. Quanto 
maior o mimero de bnhas supe'rfluas (usadas apenas uma vez. 
como as de instrucao) antes dela. maior sera a demora em en- 
con tra-la! 

2. Colocar em seguida as sub-rotinas ou trechos de programas 
que sao mais usadas ou devem ser mais rapidas (pelo mesmo 
motivo). 

3. O corpo do programa. 

4. As sub-rotinas menos usadas. ou mais longas. ou que nao 
precisam ser tao rapidas. 

5. Os segmentos refendos no item 1 . 

Muitos outros truques podem ser utilizados para aumentar 
a velocidade de um programa. Por exemplo: 

• declare como inteiras todas as vanaveis de contagem (por 
exemplo, os contadores internos de alcas). ou aquelas que nao 
precisam ser de precisao maior. Evite calculo ou impressao, 
principaJmente usando o PRINT USING, com vanaveis de pre- 
cisao dupla; 

• supnma os espacos em branco entre os comandos, se des- 
necessanos. assim como as linhas de comentano. pois eles ten- 
dem a diminuir a velocidade de interpretacao BASIC. Compa- 
re, como exemplo, a velocidade de execucao dos dois progra- 
mas apresentados na figura 1 ; 





PROGRAMA 1 












100 
110 

120 


FOR 1=1 TO 4000 

REM C0L0CA 

CR0 
PRINT @ 0, I; 
NEXT I 


NO 


ALTO 


DA 


TELA 




PROGRAMA 2 












100 


F0RI%=1TO4000:PRINT@0,I 


:NEXT 



Figura 1 

• coloque fora de al^as repetitivas expresses e defimcOes de 
constantes que podem ser executadas apenas uma vez; 

• coloque a numeraca"o de bnhas a mais baixa possivel. De- 
mora muito mais para o interpretador achar uma bnha 10000 
do que uma 5, por exemplo; 

• evite mampulacoes repetidas com vanaveis alfanumencas 
(como concatenates , uso de funcao MIDS etc.). Cne um es- 
pa<;o bem grande para elas com o comando CLEAR, pois as- 
sim evitara paradas f equentes do interpretador. para reorga- 
nizar este espaco; 

• se existem funcOes cn'ticas dentro do programa. que devem 
ser executadas em alta velocidade, programe-as em linguagem 
de maquina e use o comando USR para executa-las. Assim, o 
programa pnncipal continuara sendo em BASIC. 

GRAFICOS EM ALTA VELOCIDADE 

Uma das coisas mais difi'ceis de se lmitar dos jogos tipo 
fliperama, em BASIC, e a velocidade de animacjo (movimenta- 
cao) de graficos na tela. Os comandos SET e RESET sao muito 
lentos para programar-se ammacdes complexas. 

A S0IU920 mais comum para conseguir -se graficos de alta ve- 
locidade e a unhzacao do comando PRINT @ (PRINT AT, em 



MICRO SISTEMAS. agosto/83 



35 



ANIME-SE... E FAQA BONS JOGOS EM BASIC 



alguns computadores), que pennite colocar em qualquer ponto 
da tela um cardter ou sequencia de caracteres. Por exemplo: 

100 PRINT@460 t B A"; 

coloca na posicao 460 da tela, de um micro TRS-80, o string 
A. As posicoes sa"o contadas a partir do carater, no canto supe- 
rior esquerdo da tela e sao numeradas sequencialmente, da es- 
querda para a direita e de cima para baixo. 

Como o comando PRINT e muito mais rapido do que o 
SET, podemos colocar na tela figuras compostas de blocos gra"- 
ficos (codigos 129 a 191), que sao estipulados atravds da fun- 
cao CHRS ou STRINGS. Veja. por exemplo, a velocidade 
bem diferente com que os programas apresentados na figura 2 
s3o executados. Ambos tern o mesmo objetivo: pmtar a tela 
de bran co ; e podem ser testados em computadores TRS-80 ou 
similares: CP-500. D-8000/1/2, DGT-100, JR, Naja, CP-300 e 
JP-01. 

Assim. uma figura qualquer pode ser sintetizada atrave's da 
combinac§o de blocos graficos, concatenados dentro de uma 
mesma vanavel alfanumdnca. Por exemplo, se voce quisersin- 
tetizar no string AVS a figura de um aviaozmho composto de 
cmco caracteres graficos, use o programa apresentado na figura 
3. comando PRINT @ e" usado para tracar o aviao no ponto 
400 da tela. 

Se quiser mover o aviaozmho atrave's da tela, basta apaga-lo 
na locacao 400 (usando um STRING S( 5 3 2)), e escreve-lo no- 
vamente na locacSo 401 e assim por diante. Isto se processa 
com uma rapidez espantosa: tente! 
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• Contratos de assistencia tecnica a empresas e particulares. 
Na MS a vida de sua maquina esta garantida. 

MS - Assistencia Tecnica a 
Microcomputadores 
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PROGRAMA 3 




100 CLS 




110 FOR 1=0 TO 


127 


120 FOR 3=0 TO 


47 


130 SET (1,3) 




1*0 NEXT 3 




150 NEXT I 




PROGRAMA 4 




100 CLS 




110 FOR 1=0 TO 


1023 


120 PRINT@I,CHR$(191); 


130 NEXT I 




PROGRAMA 5 




100 FOR 1=0 TO 


15:PRINT STRINC$(64, 191) 


;: NEXT 





Figura 2 



PROGRAMA 6 

100 AV$=CHR$(1«M)+CHR$(170)*CHR$(174)+ 

CHR $(170)+CHR$(140) 
110 CLS 
120 PRINT (§U00,AV$; 



Figura 3 




Figura 4 

Figuras mais complexas podem ser sintetizadas lendo-se os 
codigos nume"ncos graficos correspondentes em DATA.e con- 
catenando-se em seguida. Siga o exemplo de geracao da figura 
de um cowboy, na listagem em anexo, e a animacSo grafica 
que o faz andar pela tela em sentido vertical e disparar um tiro 
(figura 4). A sub-rotina 800 e usada apenas na micializacao. 
para definir todos os strings com figuras. 

TESTE E DOCUMENTAgAO 

Uma vez pronto o programa e testado quanto ao seu fun- 
cionamento geral (para afastar todos os erros de programacao), 
voce deve testado em uma populaqdo alvo, ou seja, com usua- 
rios reais, na faixa eta"na e de habilidade para a qua! ele foi pro- 
jetado. Neste teste, que deve ser ta"o intenso quanto for possi- 
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vel, voce descobnrd muitas coisas que devem ser melhoradas 
no programa, tais como, veloadade de interacao. instrucoes 
completas, inadequacSo de certas regras ou operacoes etc. Um 
famoso programador de jogos para micros, o Reverendo Geor- 
ge Blank, dos EUA, deu ainda o seguinte conselho (algo radi- 
cal, mas que as vezes vale a pena): "jogue fora o programa 
pronto e comece a programa" -lo novamente desde o initio!" 

Finalmente, nSo se esqueca de documentar completamente 
o programa. Uma boa dica 6 manter uma vers2o do programa 
totalmente comentado (atrave^s de REM), intemamente, com 
uma linha de comentdno por linha de codigo (como na lista- 
gem). Deste modo, sera muito mais facil modificar ou com- 
gir o programa alguns meses mais tarde. quando ate" voce es- 
queceu c que o dito cujo fazia! 
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Animacao de Figura de Cowboy 



TRS-80 Mod. I e III e similares 



110 CLEAR 500:DEFINT A-Z 

120 60SUB 800 

130 CLS:K=65 

140 FOR KK=1 TO 6 

150 PRINT3K,BPi? 

160 K=K+64 

170 PRINT3K,P*; 

180 NEXT KK 

190 PRINT8K+B, " "7 

200 PRINT8K+R.R*? 

210 IS=K+R*7UE=IS+38 

220 FOR I=IS TO IE 

230 PRINT3I»B$; 

240 PRINT3I-1." "t 

250 NEXT I 

260 PRINT3I-1." "1 

270 PRINT3K+R,BL$! 

280 PRINT3K+R.CHR*<191>; 

290 GOTO 290 

790 ' 



J ' i n i c i al i zar 

s'definir strins cow fi9uras 

:'l impar tela, definir posicao inicial 

s'andar por 6 posicoes na tela 

s'limpa fi9ura do cowboy 
s'anda uma linha para baixo 
s'colocar cowboy em K 
: 'pro:: j mo passo 

J'apasar o braco do cowboy em K+B 
s'colocar braco horizontal com revolver 
s'pontos inicial e final da traJetoria 
I'para cada ponto da traJetoria da bala 
s'coloca a bala no ponto I 
:'e apasa a do ponto anterior 
: 'proximo ponto da traJetoria 
:'apaia bala na ultima posicao 
: 'apasa braco na horizontal 
:'e coloca braco na vertical 
s ' consel a i masem 



SUBROTINA PARA DEFINIR STRINGS COM FIGURAS 



800 B=196:R=133 

810 Xi«CHR*<26>+STRING$<5,24> 

820 P%*~" 

830 FOR 1=0 TO 5 

840 FOR J=1 TO 5 

850 READ N:P*=P*+CHR*<128+N> 

860 NEXT J:P*=P*+X* 

870 NEXT I 

880 DATA 12,46,63.47,12 

890 DATA 0,42,63/63.1 

900 DATA 48,56,51.52,48 

910 DATA 63.47,63,31.63 

920 DATA 40.63.12,63.20 

930 DATA 0,63.16.63.48 

940 R$=STRING$(3.176)+CHR$<184)+CHRf(140) 

950 Bi=CHR$(136) 

960 BL*=" 

970 BP*="":F0R 1=0 TO 5:BP*=BP*+bLS+X*:NEXT 

980 RETURN 



: 'posicao do braco e braco c/pistola 
s'desce 1 linha, recua 5 colunas 
s'contera' a fi9ura do pistoleiro 
:'concatena 6 linhas 
s' e 5 colunas de caracteres 
:' sraficos lidos em READ 
s'terainar cada linha com retorno 
:'ler mais uma linha 



* 'revolver com braco 

: 'bala 

s ' 5 espacos 

I'bloco branco de 6 por 



* 
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A p rend a um truque para aproveitar ao ma'ximo a memdria dispom'vel 
do seu micro ao programar em Assembler. 



Otimizacao de memoria 
em Assembler 



Elizabeth Simes Chahine 



O 



timizar a mem6na dispom'vel 
do computador e" uma das 
preocupacOes do programador 
na fase de elaboracao de um programa 
em Assembler. Na verdade, existem duas 
partes, em um programa, que podem ser 
otimizadas: as instrucOes e a estrutura 
de dados. Considerando apenas a segun- 
da, este artigo \x£ mostrar uma maneira 
de implementar os dados sem ocupar 
grandes espa90s de mem6ria. 

Vamos considerar uma estrutura que 
requeira alguns cuidados do programa- 
dor. Esta estrutura define os dados atra- 
ve*s de uma analise em arvore, como 
mostra a figura 1 . Observe que cada ra- 
mo representa um dado. Temos,entao, 
seis dados - 000, 010, 012, 020, 021 
e 022; e cada dado significa um deter- 
minado tratamento que o programa de- 
ve realizar. 

A implementacao destes dados na 
membna do computador pode ser feita 



de duas maneiras. A primeira, atrave"s da 
tabela indexada direta, 6 um modo sim- 
ples mas que, em compensacSo, nao nos 
oferece otimizacao da area de dados; ja 
a segunda, a tabela indexada indireta, 
apesar de mais complexa, minimiza a 
area de dados. Vejamos entSo como es- 
tes dois artificios sa"o utilizados, compa- 
rando sua eficiencia. 

TABELA INDEXADA DIRETA 

A tabela indexada direta consiste 
em se defimr, pnmeiramente, um en- 
dereco padra"o que sera o endere90 mi- 
cial da tabela. Cada dado representara a 
quantidade a ser acrescentada ao endere- 
90 padrlo, de forma a se obter um novo 
endere^o, cujo conteiido in forma sobre 
o tratamento necessano ao determinado 
dado. 

Considerando o endere^o padrao 
8.000, temos para o nosso exemplo an- 
terior: 



(0) 


® © 


"*© 



8.000 

8.000 
8.000 
8.000 
8.000 
8.000 



000 
010 
012 
020 
021 
022 



8.000 
8.010 
8.012 
8.020 
8.021 
8.022 



Figura 1 
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Veja que: (endereco padrao) + (da- 
dos) = (endere90 que contem informa- 
c3o sobre o dado). Neste exemplo, con- 
sideramos tanto os endere90s como os 
dados na base decimal, entretanto, eles 
podem ser conaderados em qualquer 
base. 

Analisando o processo acima, perce- 
bemos que a tabela, cujo endere90 mi- 
cial e final sJo respectivamente 8.000 e 
8.022, apresenta diversos endere90s que 
n3o contem nenhuma informacao, isto 
6, em 22 pos^oes de memona apenas 
seis s3o utilizadas. 

Concluimos portanto, que a tabela 
indexada direta e um meio pratico de 
gerar a estrutura de dados, mas que na"o 
otimiza a area de dados usada. Quando 
os niveis desta estrutura aumentam, po- 
dendo cada ramo gerar no minimo mais 
tres, este tipo de tabela indexada na"o 6 a 
forma mais adequada para se construir 
a estrutura de dados. 

MODO INDIRETO 

Como foi dito no inicio deste artigo, 
existe um outro tratamento que minimi- 
za a area de dados e que pode ser usado 
em qualquer grau de complexidadc. A 
forma mais simples de exphca-lo 6 atra- 
v€s da sua aplica9a"o no exemplo ante- 
rior. 

MICRO SISTEMAS, agosto/83 



Recordando o exemplo, temos que o 
19 digito mais sigmficativo dos dados e 
0, p que nao caracteriza nenhum deles. 
Portanto, vamos a analise do 29 digito. 
Vemos que este juntamente com o 39 
digito 6 que definem os seis dados. 

Ao 29 digito, que comeca a definir 
o dado e corresponde aos numeros 0, 1 
e 2, atribuimos uma tabela, cujo tama- 
nho e" o niimero total de situacOes que 
podem ocorrer, conforme est2 demons- 
trado na figura 2. Veja que cada 29 di- 
gito, que necessita de mais anahse, gera 
uma tabela (figura 3). endereco TAB., 
que i o uncial da tabela, e" definido pelo 
programador. 

Observamos enta"o, que para se defi- 
nir os dados utilizamos nove poacoes 



de memdria, sendo que uma sem in- 
formaca'o, seis com tratamento e duas 
com o vetor deslocamento. Sendo assim, 
este m^todo indireto de tabela indexa- 
da, apesar de mais trabalhoso do que o 
me'todo dire to, possui uma grande van- 
tagem: utiliza nove posicOes de mem6- 
ria, enquanto o outro utiliza 22. 

A dificuldade que podera surgir na 
utilizacSo do modo indireto de tabela 
indexada envolvendo muitos dados e 
a determinacSo do vetor deslocamento, 
pois cada situacffo que necessita de mais 
analise, gera outra tabela. £ necessano 
cobnr todos os dados e nao deixar ne- 
nhum buraco na drea de mem6ria cor- 
respondente. 

Para superar isto, elaborei um progra- 
ma, cujo fluxograma esta na figura 4. 



NtVEL 2 (Digito 2) 



TAB. + 



TAB. + 1 



TAB. + 2 



TRATAMENTO 



VETOR 
DESLOCAMENTO 



VETOR 
DESLOCAMENTO 
2 



2« digito ja define o 
tipo de dado, entao nesse 
endereco esta o tratamen- 
to indicado a ele. 



Necessitam de mais infor- 
macao. Neste caso o vetor 
deslocamento indica a quan 
tidade a ser somada ao TAB 
de forma a ser analisado o 
32 digito. 



t 



Figura 2 



NtVEL 3 (Digito 3) 

PADRAO + VETOR DESLOCAMENTO 1 


PADRAO + VETOR 1 + 
PADRAO + VETOR 1 + 1 
PADRAO + VETOR 1 + 2 


TRATAMENTO 


010 

011 

012 






TRATAMENTO 


TABELA DOS DADOS TIPO 01X, 
PADRAO + VETOR 


ONDE X=0, 1 ,2 
DESLOCAMENT 


O 2 


PADRAO + VETOR 2+0 
PADRAO + VETOR 2 + 1 
PADRAO + VETOR 2+2 


TRATAMENTO 


020 

021 

022 


TRATAMENTO 


TRATAMENTO 


TABELA DOS DADOS TIPO 02X, 


ONDE X=0, 1 , 


2 



Figura 3 
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Dessa maneira, o operador s6 se preocu- 
pa em fomecer o significado de cada 
codigo, pois o programa se encarregara 
de calcular os vetores deslocamento e 
preencher a tabela. 

O algoritmo de implementacSo i da- 
do na figura 5 com base na estrutura de 
dados considerada. Observe que toda ta- 
bela foi varrida e preenchida. 



PROGRAMA 


OPERADOR 


? 


1 


0? 


3 a N 


1 ? 





10? 


3 a N 


11? 


2 


12? 


3 a N 


2? 





2 0? 


3 a N 


2 1? 


3 a N 


2 2? 


3 a N 



Figura 5 - Tratamento do algoritmo dado ao 
exemplo. 




INSTITUTO DE TECNOLOGIA ORT 



CURSOS DE 
PROCESSAMENTO DE DADOS 



FORMA^AO DE PROGRAMADORES 
(COMPLETO) 

Dura;ao: 8 meses 

Horario: 2 a a 5 a feira de 19:00 as 22:00 hs 

MIC ROCOMPUT ADORES E A 
LINGUAGEM BASIC 

Dura^ao: 3 sem an as 

Horario: 2« a 5* feira de 19:00 as 2200 hs 

Turmas de 15 alunos 



AMPLA UTILIZAQAO DO 

IBM-4341 E DO LABORATORIO 

DE MICROCOMPUTADORES 



Visite o CPD-ORT - Diariamente apos 
13O0 hs - R. Dona Mariana, 213-Botafogo 
Rio de Janeiro - Tels.: 226-3192 "246-9423 



otimizaqAo de memGria em assembler 



V . 



vi + u — x 



Z^E7 

/ INPUT C / 




VETOR DESLOCAMENTO 



ARMAZENA 
VALOR DE U 
EM TAB + X 



MAO ESTA EM 
TABELA 



SEM 

NENHUM 

TRATAMENTO I 



VARlA VEIS 

Tab = Endereco de memoria 

L = Nivel 

V = Vetor de escrira 

VI = Vetor de indexafdo 

NL = Niimero cuja quantidade de digitos = l. 

U = Unidade ou dezena de NL 

C= Controle 

Tarn '= Tamanho da tabela que corresponde 

ao niimero de situacoes 

CONTROLES 

- vetor deslocamento 

1 - sem tratamento 



tratamento tipo .V 



Elizabeth Simes Chahine 4 formada em Enge- 
nharia Eletrdnica pela PUC, tendo cursos de 
Teleprocessamento e Organ izagao e Me"todos. 
Atualmente trabalha na Datapoint como En- 
genheira de Projetos. ■ 




Figura 4 
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Programas para o seu 
TK82-C e TK85 




dot ianc*« ..-«,..». . ........... 

HI* a posicao d<( p*<«» El* pod*', 
nd»r * tui |oo«d< 





CD-6809, da empresa gaucha 
Codimex, e" o pnmeiro micro 
pessoaJ brasileiro a utilizar o 
microprocessador 6809E, populanzado 
a partir de seu uso pelo micro amenca- 
no TRS-80 Color. 

Como destaques, o CD-6809 apre- 
senta o uso de cores, alta resolucao gra- 
fica com duas e quatro cores e a compa- 
tibilidade de software com o TRS-80 
Color. 

HARDWARE 

Como ja dissemos, a UCP do CD- 
6809, e o microprocessador 6809E. de 8 
bits e clock de 0.894 MHz. Sua memo- 
na compreende 16 Kb de EPROM e 16 
Kb de RAM, expansi'vel ate - 32 Kb. 

Seu teclado £ do tipo Digiponto e 
tern 53 teclas com reed suitch. Como 
monitor, o CD-6809 utiliza-se de qual- 
quer TV, preto e branco ou a cores 
(PAL-M), com display de texto de 16 
linhas por 32 caracteres e resolucao gra- 
fica de 64 x 32 pontos de nove diteren- 
tes cores. No modo alta resolucao graft- 
ed, o CD-6809 tern cinco opcOes: 1 28 x 
96 pontos, com duas ou quatro cores; 
1 28 x 192 pontos, com duas ou quatro 
cores; e 252 x 192 pontos com duas co- 
res. Km todos os casos, o micro da Codi- 
mex oferece a possibdidade de pagina- 
qao de video. 

O CD-6809 utibza-se de gravador cas- 
sete como memona auxihar. gravando 
em 300 BPS. Para o segundo semestre, 
a Codimex promete o lancamento de 
unidades de disquetes de 5 1 /4", pnmei- 
ramente de face e densidade simples e, 
sem data prevista, ela pensa no lanca- 
mento de uma saida para cartuchos de 
programas, tais como os usados no TRS- 
80 Color, Atari, Vic etc. 

Como interfaces, o CD-6809 tern 
duas said as anal6gicas para joysticks 
(que podem ser usadas como converso- 
res analogico-digitais). uma saida 
RS232C para impressora serial ou mo- 
dem e urn conector em placa para ex- 
pansao do sistema. 




SOFTWARE 



CD-6809 utibza-se de urn BASIC 
Estendido como bnguagem (residente 
em 1 6 Kb de EPROM), que e acrescido 
de alguns comandos para a utilizacao de 
graficos e cores, tais como: 

• CIRCLE - Gera uma circunferencia 
(a partir do centro e do raio), uma ebpse 
ou umarcona tela; 

• COLOR - Determina a cor para figu- 
res ou fundo de tela; 

• DRAW - Projeta uma imagem se- 
guindo direcao, cor e escala determina- 
das pelo usuano; 

• GET/PUT - Possibdita a armazena- 
gem de desenhos cnados no video para 
posterior utilizacao ou dupbcacao dos 
memos; 

• LINE - Traca uma bnha entre dois 
pcntos na tela, ou urn retangulo com 
vertices nos pontos fixados; 

• PAINT - Pinta urn desenho com a 
cor especificada; 

• PCLEAR - Reserva paginas de me- 
m6na para graficos e facilita o armaze- 
namento de vanas delassimultaneamen- 
te no micro; 

• PCLS - Limpa a tela com a cor de 
fundo; 

• PCOPY - Copia urn grafico de uma 
pagina para outra; 



• PMODE - Seleciona a resolucao e a 
pagina de trabalho; 

• PPOINT - Testa urn determinado 
ponto no video; 

• PSET - Impnme ou apaga um ponto 
na tela; 

• SCREEN - Seleciona entre modo 
grafico ou texto e conjunto de cores. 

Para geracao de sons, o CD-6809 tern 
as instrucOes PLAY, que gera notas se- 
gundo a escala pobfonica, permitindo a 
indicacfo da nota (inclusive sustenido), 
tempo de duracao, pausa entre notas. 
volume e oitava, e SO UND, que emite 
um som de frequencia e duracao defini- 
das. Os sons gerados s3o reproduzidos 
atrave"s do alto-falante da TV que estiver 
sendo utilizado. 

Uma grande vantagem para um usua- 
no do CD-6809 e" sua total compatibUi- 
dade de software com o TRS-80 Color 
que possui, no exterior, uma vasta e va- 
nada gama de software apbcativo, des- 
tacando-se pacotes educacionais e de jo- 
gos. Ale"m disso, a Codimex pretende 
lancar alguns pacotes para a area admi- 
mstrativa/comeraal, alem de uma inter- 
face para transformacao do CD-6809 em 
terminal de videotexto. 

Para maiores informacdes, a Codimex 
Importacao, Exportac3o e Industna de 
Computadores Ltda. fica na Av. Wences- 
lau Escobar 1549, Porto Alegre, RS, 
tel. (0512) 49-8446. ■ 



POR ESSA 

Uma novldade que parece um acha- 
do. 80NAR/IN8PEC. 

Voce recebe resumos seleclonados 
pelo computador, dentro do amblto 
exato do seu interesse — pontual- 
mente a cad a 15 dlas. 

Veja alguns assuntos abordados: 



VOCE nAo esperava... 

apllcaooes, tecnologia de software, 
controle de processos. automa?ao de 
escrltorios, microeletronica, para cl- 
tar apenas alguns. 

Tudo 18SO pelo preoo da asslnatura 
de uma revista: 5 ORTN's por ano. 

E voce ainda pode fazer uma expe- 



riencla: recebe o service durante dots 
meses, sem pagar nada. 

E facil: Telefone, escreva ou en vie 
. um telex ao CIN 

^'-^ Comt— lo Nadonal <to EfMrgla Nucte 
J~ Centra d« Uxtormm^6mm Nuctearas 
Rua 8— 1 S*v*fi«no, M 
,f^n [7^ 222M Wo da Janeiro - RJ RhmR 
V S— jUf tt T«L: (021) HMM TalaM (021) 212M CNEM BR 
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uas marcas 







me uttlizar com todos os K -Bytes de poteiv 
Quando rmos juntos, nao ficard sonicate uma 

• mbran< a. mas sim, muitos '> • v de memdria. 
vode me encontrar em to das as modalidaih 
us ou dupla face, 8 ou 5 1 14 ' 
»ipaliiel com todoS os tipos de Dm 

t rtiflca (irantida de zero erms. 

de me adquirir em qnalquer ponto 
rasil, atrates da Rede National de 
Repn sentantes e Reiendedores. 



\^fA 
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Os Jogos Adventure tomaram conta dos microcomputadores — ede todos 
os herdis aventureiros da era da informatica. Conheqa um pouco mais sobre eles. 



O mundo f antastico dos Adventures 



Fabio Cavalcanti da Cunha 



\y^T\ este artigo vamos falar sobre 
Ixl aquele que talvez seja o mais 
1^ ^1 j fascinante jogo criado para 
computadores - o Adventure. 

A grande maiona das pessoas que tra- 
balham ou trabalharam com computa- 
dores de grande porte devem conhecer, 
ou pelo menos tentaram conhecer, os 
intenores da Caverna Colossal (Colossal 
Cave). Este foi o pnmeiro Adventure 
escrito - baseado na obra de J.R.R. 
Tolken, "O Senhor dos Ane'is", e no 
famoso jogo de mesa norte-amencano 
Dungeons and Dragons (Masmorras e 
DragOes) -, onde o jogador se transfor- 
ma num aventureiro conquistador que, 
possuindo armas e poderes magicos, pas- 



sa a explorar, em busca de tesouros, urn 
mundo exotico e povoado de monstros, 
castelos abandonados, feiticeiros etc. 
Este programa, originalmente escnto em 
FORTRAN por Whille Crowther e Don 
Woods num DEC PDP-10, ocupando 
cerca de 300 Kb, logo se espalhou pelo 
mundo inteiro, tornando o Adventure 
um jogo famoso, portm restnto ao pes- 
soal que tinha acesso ao sistema. 

Em 1978 um programador de siste- 
mas chamado Scott Adams, que apos 
uma semana de longas sessOes noturnas 
com- o Adventure se toma "Grande 
Mestre" (titulo que o programa da 
aqueles que conseguem conquistar todos 
os tesouros em pouco tempo), ficou fas- 




(Eastle 

I tjOLFENSTEIN 



cinado com o jogo e suas possibilidades. 
Naquela e'poca, quando os microcompu- 
tadores pessoais estavam em plena as- 
cencSo nos Estados Unidos devido ao 
recente lancamento do TRS-80 Modelo 
I e do Apple, Scott decide escrever o 
pnmeiro Adventure para micros - o 
Adventureland (Terra da Aventura), es- 
crito em BASIC, o qual lmediatamente 
se tornou um sucesso comercial. 

A partir dai, Scott nao parou mais de 
escrever Adventures, inclusive utihzan- 
do-se de linguagem de maquina para 
torna-los mais eficientes. Hoje Scott, 
ale'm de possuir sua propna empresa de 
software , i conhecido como o padnnho 
dos Adventures para microcomputado- 
res, tendo produado cerca de 12 deles. 
Entre eles, podemos citar o Pirate's 
Adventure (Aventura do Pirata, consi- 
derado por muitos uma obra pnma), o 
Mission Impossible (MissSo Impossi'vel). 
The Count (0 Conde, onde voce" e pri- 
sioneiro no castelo do Conde Dracula) e 
Voodo Castle (O Castelo Vudu.no qual 
existem feiticos de vudu e voce" tern que 
desfaze-los). 

MAS QUE £ O ADVENTURE? 

Suponha que o computador se tor- 
ne seus olhos e suas maos e, a seguir, co- 
loque-o num mundo imaginano. Estabe- 
lecido o objetivo do jogo, como por 
exemplo a conquista de tesouros ou a 
fuga de uma prisSo, comece a explorar 
este mundo. Para isso, voce tera que di- 
zer ao computador o que fazer atravds 
de comandos do tipo VA NORTE ou 
ABRA A PORTA, sempre compostos de 
um verbo e de um objeto (alguns pro- 
gramas mais sofisticados conseguem dis- 
tinguir artigos e preposicOes). O progra- 
ma realizara' tais comandos e descrevera 
o que ocorreu e o que ele estd "vendo". 

£ sempre util fazer um mapa do local 
para que voce" possa se orientar e se mo- 
vimentar mais facilmente. A partir dai, 
o programa se torna uma espe'cie de que- 
bra-cabeca, e sua tarefa sera a de resol- 
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ver o problema, seja ele conquistar um 
tesouro ou escapar ao ataque de mons- 
tros. 

Durante o jogo, existem as opcOes de 
armazena-lo para poder continuar mais 
tarde (lmprescindivel, pois 6 pratica- 
mente impossivel resolver um Adventure 
numa linica vez); de verificar o seu pla- 
car (quantos tesouros conseguiu); de ve- 
nficar o que voce" estd carregando (voce 
faz um inventano de suas posses); e de 
abandonar o jogo. 

FundamentaJmente, o jogo se divide 
em quatro partes: onde voce" esta\ o que 
voce" ve, para onde voce" pode ir, e pnn- 
cipalmente o que voce pode fazer. Para 
se obter sucesso i necessino ter muita 
imaginacSo. £ importante que voce se 
imagine naquele mundo exdtico e pense 
quals sSo as possibibdades, quais seriam 
as provaveis sai'das e i claro, explorar to- 
das as hipoteses. 

OS TIPOS DE ADVENTURE 

Scott Adams n2o foi o linico a escre- 
ver estes programas para microcomputa- 
dores. apenas o pnmeiro. Apos o lan^a- 
mento do Adventureland uma febre to- 
mou conta do mercado de software dos 
Estados Unidos. Dezenas de diferentes 
\<hcntures foram lancados, e foram 
cnados vanos clubes de [dvmtun'i 
(pessoas cujo hobby 6 jogar Adventu- 



re), fornecendo publicacSes com dicas e 
mapas sobre jogos. Algumas software- 
houses promoveram (e ainda promo- 
vem) torneios nacionais com premios 
para os melhores jogadores, e no Dia das 
Bruxas, uma empresa que presta servi- 
ces por telefone para usuanos de micro- 
computadores chegou a reahzar um tor- 
neio gigante hgando toda a sua rede, 
dando a todos a oportunidade de com- 
baterem entre si. 

Hoje existem centenas de tipos de 
Adventure. Podemos dividi-los segundo 
o enredo ou segundo caracteristicas es- 
peciais, tais como graficos, voz etc. 

Enquadrados no pnmeiro tipo (se- 
gundo o enredo), estao, por exemplo, os 
que slo onentados para a conquista de 
tesouros. Podemos citar o fascmante 
Zork, the Underground Empire (Zork, o 
Imp^no Subterraneo) o Deadly Dun- 
geon (Masmorras Mortals) e o Pyramid 
2000 (A Pirarmde 2000). Outros enre- 
dos visam a realizacao de um objetivo: o 
resgate de uma pnncesa, como em Re- 
vange of lialrog (A Vingan^a de Balrog); 
a desativacfo de um reator nuclear pres- 
tes a explodir, como em Mission Impos- 
sible (Missa"o Impossivel); ou ainda a 
construct de um monstro, como em 
Frankenstein Adventure (A Aventura de 
Frankenstein). 

Entre OS Adventures que possuem 
caracteristicas especiais grahcas, estSo o 



fant^stico Wizardy (Magia), o Asylum 
(Asilo) e o Microbe (Micr6bio). Neste 
ultimo, voce 6 comandante de um mi- 
croscopio submanno que passa a explo- 
rar os intenores do corpo humano. Exis- 
tem tamWm aqueles que possuem voz. 
ou seja, o programa "fala" durante o jo- 
go, como no Forbiden Planet (Plane ta 
Proibido) ou no Forbiden City (Cidade 
Proibida). 

Os Adventures sa"o, enfim, os quebra- 
cabecas da era da informatica. Para jo- 
gar, ao inve's de papel e lapis, utihzamos 
o computador, num nivel de imaginacjSo 
e concentracfo muito maior, tanto que 
noites de sono s2o facilmente perdidas 
apenas pela satisfacao de ver o problema 
resolvido. 

£ pena que em nosso mercado ainda 
nao exista similar nacional, pois muitos 
jogadores enfrentam dificuldades com 
relacao aos tempos dos verbos e utiliza- 
9S0 de artigos, se bem que isso possa ser 
resolvido atrave's da mampulacao das se- 
quencias alfanumencas. ■ 



fibio Cavalcanti da Cunha 4 aluno do curso 
de Engenharia Eletrdnica da Escola Polit4cni- 
ca da Universidade de Sao Paulo. Esteve re- 
centemente nos Estados Unidos, onde assistiu 
a cursos e exposiodes sobre microcomputa- 
dores. 
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Impressora 

Matricial 

Elgin Lady 






Velocidade de impressao 100 cps 
132colunasa 10 cpi 



A impressora Elgin Lady e o novo padrao para aplicacoes profissionais 

em seu computador pessoal ou microcomputador. 

Com velocidade de 100 CPS, os caracteres impressos em matriz de pontos 

no formato 9x7, sao de alta resolucao. Com capacidade de 132 colunas, 

comporta ate 264 caracteres/linha. 

Atraves de uma tecla, em modo conversacional, 18 funcoes sao disponiveis 

para completa definicao do formato de impressao, 

entre as quais 11 funcoes podem ser programadas via software. 

Com o modulo Elgingraph, a impressora Elgin Lady 

constitui a melhor escolha para seu microcomputador, 

em aplicacoes que requerem total flexibilidade grafica 

atraves de caracteres semi -graficos ou funcoes graficas 

com enderecamento a nivel de agulhas. 

As interfaces, intercambiaveis a nivel de operador, 

capacitam a Elgin Lady a uma serie de diferentes coneccoes 

com a maioria dos microcomputadores 

e sistemas disponiveis no mercado. 




LETaDNIDR 



Uma Otv^ao 0« ELGIN MAOUINAS SA 

«u« Barao dt Campinas. 305 

CEP 0t20i To 

Tal«K (011)37806 EIGI8H 

Faty>ca em Mogi das duzes ! 

Fmada a ABICOMP 



Coohe^a a nova Elgin Lady em 



S4o Paulo: MICROSHOP Fone 282-2105 • COMPUTERLAND Fone 258-295<i • COMPUSHOP Fone 212-9004 
SERVIMEC Fone 222-151 1 • IMARES Fone 881-0200 Campinas: COMPUTIQUE - Fone 32-3810 

Rio de Janeiro: COMPUTIQUE Fone 267-1093 • CLAPPY ■ Fone 253 7930 • TECNITRON Fone 233 9670 
Porto Alegre: INFORMATIOUE Fone 21-4189 • COMPUMlDIA - Fone 22-5061 
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Color 64 



fm flpj ais urn lancamento na area. A 
[m/l empresa canoca Industna e Co- 
XTA mercio de Computadores Novo 
Tempo Ltda.- desenvolveu o Color 64. 
compativel com o Modelo TRS-80 Co- 
lor, da Radio Shack amencana. Assim. 
o Color 64 oferece a seus usua'nos total 
compatibihdade com o software feito 
para os micros amencar.os TRS Color 
Computer e TDP-100 e para o ingles 
Dragon 32. Destaca-se nele a alta reso- 
luc^o graft ca e a possibilidadede uso de 



nove cores. 



HARDWARE 



A unidade central de processamento 
do Color 64 e" o microprocessador 
6809E. fabncado pela Motorola. Este 
integrado representa uma evolucSo do ja 
famoso 6502 e opera internamente com 
registradores de 1 6 bits. 

clock do Color 64 e" chaveado por 
software e pode ser de 0.9 ou 1 .8 MHz. 
interpretador Color BASIC, responsa- 
vel pela execuc3o de todos os comandos 
digitados pelo usuano, ocupa 16 Kb de 
memona EPROM. A mem6na para pro- 
gramas do usuano e de 64 Kb, ja vindo 
nesta configurac^io de fabnca. 

A saida de video e compativel com o 
sistema colondo PAL/M. e sai em radio 
frequencia nos canais 3 ou 4. podendo 
ser conectado a qualquer aparelho de te 
levisao nacional sem problemas. Ele pos 
sui nove cores (verde, amarelo, azul 
vermelho, bege . azul esverdeado, carmim 
ab6bora e preto), que podem ser utibza 
das em 13 modahdades graft cas diferen 
tes. 

SOFTWARE 

Color 64 possui no interpretador 
Color BASIC urn software bastante ver- 
satil. Ele e constituido por tres grupos 
de comandos que, em conjunto, aten- 
dem a programa^o de todos os recur- 
sos do micro. 




O teclado do Color 64 possui S3 techs no padra'o ASC II. sendo 44 de caracteres (cor cinza). 
olto de controle (cor brancaj e uma de interrupcdo (vermclhal 



O pnmeiro grupo reiine os comandos 
necessanos a confeccSo de sistemas co- 
merciais. Sao os comandos que permi- 
tem a leitura/gravacSo de dados em cas- 
sete; ednjao/impressao de dados em rela- 
tono; manipulaclo de strings e calculo 
de fun^Oes antme'ticas. segundo grupo 
engloba os comandos necessanos a ma- 
nipulacao de recursos grdficos do Color 
64. Sa"o comandos que deftnem o nivel 
de resolu9ao da tela - baixa (64 x 32), 
media (128 x 192) ou alta (256x192) 
- ;a cor dos pontos na tela e seu formato 
de apresentacSo (em linha, circulo ou 
elipse). O terceiro grupo agrega os co- 
mandos necessanos a interpretacao de 
musica no Color 64. S3o comandos que 
espeaficam volume, ntmo, oitava e 
tempo das notas musicals que compdem 
a partitura. 

No tocante ao software aphcativo, o 
Color 64 dispoe de uma bibboteca de 
sistemas administrativos que ja conta 
com sistemas de Controle de Estoque; 
Folha de Pagamento;Contabilidade: Ca- 



dastro de Clientes e Mala Direta. A nivel 
domestico, existem programas de Agen- 
da Telefonica; Didno e alguns jogos. 

PERIFERICOS 

Color 64 possui urn conector de 
expansao e quatro conectores de penfe- 
ncos distnbuidos da seguinte forma: 
duas entradas analbgicas para conexao 
de joystick; uma pona serial RS 232C 
para conexSo de impressora ou modem; 
uma pona para conexao de gravador 
cassete e uma conexao para interface de 
disquete que permite o controle de ate 
quatro unidadcs com face simples e du- 
pla densidade. 

Em sua configuracao basica, com 64 
Kb de RAM, o Color 64 sera comercia- 
bzado por aproximadamente CrS 600 
mil. 

A Novo Tempo Ltda. ftca na Av. Jo- 
se Mendonca de Campos 680, em S«to 
Goncalo, Rio de Janeiro, e seus telefo- 
nes sao (02 1)701 -0005 e 701-2888. ■ 
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CENTRALDAIA 

til r huruilititt lUi 



SUPRIMENTO E COISA SERIA 

• Matenha o seu compulador bem alimentado adquirindo produtos de qualidade consagrada 

F iia M a g nei ica : 600. 1 200 e 2400 Pes 



Discos Magneticos 5 Mb. 16 Mb. 80 Mb etc 

Diskettes 5 1/4. e 8 Polegadas — Simples e Dupla Face 

ETIQUETAS PIMACO -PIMATAB 



Fita CARBOFITAS p/lmpressoras Globus M 200 — 8 300/600 

• Fita p/lmpressoras Elebra, Oigiiab. Diablo. Ceniromcetc 

• Cartucho Cobra 400 

• Pastas e FormulanosContinuos 



AV PRESIDENTE VARGAS. 482- GR 207 - TELS (021) 263-5876 - 253-1 120 - RJ 
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Arafertil, Ber nardini, Coinbra, 

Du Pont, Hospital Albert 
Einstein, LEDA f Liceu Pasteur, 

Penf ield, Philco, Pisa, 

Polyfilm,Seta Fonogramas, 

Spal,Task,Volvo. 

Estas empresas 
sempre tomaram decisoes 

muito serias. 
O Unitron API I foi uma delas. 



** 




Todas essas empresas ja 
descobriram que, tao importante 
quanto a decisao de comprar um 
microcomputador pessoal, e a 
decisao de onde compra-lo. 

Na CompuShop a preocupacao 
e f azer com que voce tenha o 
microcomputador certo, de 
acordo com as suas necessidades. 

Foi por isso que a CompuShop 
criou TotalWare. 

TotalWare e uma exclusividade 
CompuShop - e ao mesmo tempo 
hardware e software, 
equipamento e oportunidade, 
servico e conf iabilidade,programa 
e consulta, atendimento e novos 
produtos. 

E foi exatamente por toda esta 
infra -estrutura de apoio que as 
empresas acima decidiram pela 
CompuShop -a loia especializada 
em microcompuiadores onde 
voce encontra software, 
perifericos ; acessbrios, diskettes 
e formulanos, a mais completa 
linha de livros e revistas nacionais 
e importados, alem de cursos e 
assistencia tecnica permanente. 

Procure o seu Unitron AP II na 
CompuShop. 

Uma decisao tao certa quanto a 
que essas empresas ja tomaram. 



CompuShop 



Presente nas melhores empresas. 



Rua Dr. M4rio Ferraz, 37 - CEP 01453 

Sao Paulo - SP - Tels. : ( 01 1 ) 2100187/212-9004 

Telex (Oil) 36611 BYTE BR 

Estacionamenlo proprio. 

Aberta de Segunda a Sexta das 9 as 19 horas e 

aos Sabados das 9 as 14 horas. 



Voce e o unico sobrevivente de urn aviao que caiu na selva. Agora, a/a com cautela e 
consagrese heroi desse jogo de aventura, feito especialmente para a linha Sinclair. 
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Aventuras 
na selva 
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Ml as afinal, o que e um Adventu- 
re? Quern conhece este tipo de 
jogo sabe niuito bem como e 
difi'cil defmir, em poucas palavras, o 
que vein a ser um jogo de aventuras. Por 
mais que se tente, sempre parecera, a 
um leigo, que se trata de um jogo ldio- 
ta, onde o jogador se encontra diante de 
uma situacao absurda e impossi'vel de 
ser soluaonada. 

De fato: o que pensan'amos de um 
jogo que na"o tern desenhos, nem movi- 
mentos, e o jogador tern que literalmen- 
te dizer ao computador o que fazer, e, 
ainda mais, estar num hospi'cio as voltas 
com um louco homicida tentando agar- 
ra-lo? "Louco deve ser o cara que acha 
isso tudo interessante." Mas nao e nada 
disso. 



O Adventure e um jogo apenas dife- 
rente. Ha um en redo e um objetivo. £ 
claro que o objetivo e sair de uma situa- 
cao dehcada, achar um tesouro, ou ou- 
tra coisa qualquer. mas o que real me ri- 
te importa e eomo este objetivo sera 
atingido. Pode-se levar muito tempo, as 
vezes dias. para se achar a solucao do 
problema e, na verdade, a sai'da do jogo 
so e aJcancada uma vez - isso porque 
toda charada perde a graca quando nos 
conhecemos o seu final. Antes, porem. 
de nos aventurarmos num jogo desses,e 
preciso entende-lo bem. Isto e funda- 
mental para que o jogador nao entre em 
estado de loucura. 

Os Adventures sao jogos que reque- 
rem, dos computadores, grandes quanti- 
dades de men6na e agibdade na execu- 



cao de programas. Mas sera que isso ui- 
viabihzana esses jogos nos TKs, NEs e 
CPs? Nao se fizermos algumas conces- 
soes. 

£ claro que um Adventure num equi- 
pamento destes. com 16 Kb de RAM, 
nao e nenhum prodi'gio. No entanto. 
pode ser um desafio bastante mteressan- 
te se aceitarmos as limitacOes do equipa- 
mento, ou melhor, da quantidade de 
memona disponi'vel. 

Na"o se trata aqui do ni'vel de comple- 
xidade operacional. ja que poden'amos 
ter um programa que reconhecesse as 
sutilezas mtencionais de uma frase. 
problema e que isso resultana em falta 
de memona para coisas mais simples, ou 
mesmo para o sistema dar respostas cla- 
ras e objetivas. 



Tabela de dados do monitor 



Posicoes 

1 f~?5 

2 -KIT. 

3 II, II 

4 *£B-C 

5 -.-8 

6 -A4 

7 F 

8 A.I* 

9 .-.2 

10 K£.B.H 

11 B.H..4 

12 F.B7B 

13 --G 

14 B 

15 8 

16 BKI*U 

17 H 

18 -6-irj 

19 =..9 

20 E 

21 ...)- 

22 £ 

23 1B.-B 

24 ..B.B 

25 .-(11, 

26 .B2.0 

27 )■»-■ 

28 .- 

29 *.„B.? 

30 BJ:J~B 

31 ?*K.3 

32 ..*B.> 

33 B../ 

34 

35 . . Sfifi 

36 D.DB 

37 .*$B 

38 QLBL..H 

39 D8 

40 1 

obs: ■*■ digite 
um espago 



Objetos 



1 


£5Uf!A LANTERNA 


2 


H5UP1A CANOA 


3 


£5UF1A CORDA 


4 


-5UC1A PEDRA 


5 


.4UI"I NAPA 


6 


-4urn LAGO 


7 


I4UPI NACHADO 


8 


54Un REVOLVER 


9 


S4UI*I TRONCO 


10 


£4urn RELOGIO 


11 


G4UM ANEL 


12 


.5UP1A ARVORE 


13 


B5UP1A BUSSULA 


14 


.30 CACIQUE 


15 


34Un FACAO 


16 


-5UFIA TRILHA 


17 


/4UH 5ARC0FAG0 


18 


.5UI»IA CHAVE 


19 


.5UMA PORTA 


20 


G5UPIA VELA 


21 


04UPI VASO 


22 


,5UP1A PICARETA 


23 


-4UI*1 ID0L0 


24 


-5UPIA PASSAGED 


25 


= 4UF1 BAU 


26 


-4UP1 LIVRO 


27 


.5UC1A GARRAFA 


28 


sum PONTE 


29 


.4UM ABISMO 


30 


>5UP1A COBRA 


31 


-5UC1A NARRETA 


32 


N5UflA CAVEIRA 


33 


G5UPIA PULSE IRA 


34 


25UP1A CORRENTE 


35 


54UfO E5PELH0 


36 


.4UR AVIAO 


37 


-4UPI LOCAL 




Palavras 




1 £N0RTE 




2 $SUL 




3 :LESTE 




4 70ESTE 




5 (ENTRE 

6 (SUBA 






7 )SAIA 

8 )DESCA 






9 >PEGUE 



10 <50LTE 

11 =EXAf1I 

12 *R0UBE 

13 -QUEBR 

14 *PR0CU 

15 /LIGUE 

16 ;DESLI 

17 .DESAfl 

18 .AltARR 

19 0COLOQ 

20 1TECI0S 

21 2FACA 

22 3FIATE 

23 4ABRA 

24 5FECHE 

25 2CAVE 

26 6PULE 

27 7DE5MA 

28 8PUXE 

29 BDE 

30 9REINI 

31 ALEVAN 

32 >APANH 

33 0PONHA 

34 65ALTE 

35 <DEIXE 

36 9C0HEC 

37 3D I SPA 

38 3ATIRE 

39 /ACEND 

40 CHA 

41 >SEGUR 

42 2C0NST 

43 1TENH0 

44 ;APAGU 

45 <LARGU 

46 CTEfl 

47 »ACHE 

48 -DESTR 

49 2C0NSE 

50 -C0RTE 

51 -RASGU 



Movimentos 
condicionais 



N:£K£H9S 

N:$L£H*S 

0?:HJS 

0?:H9S 

N(?HGS 



6 


N(?H:S 


7 


N)(H7S 
N)(HFS 


8 


9 


0+3HES 


10 


X:5VtS 


11 


N>)Hns 

N>)HCS 


12 


13 


N=,H<QSS 


14 


L£H6S 


15 


K£HDS 


16 


U:=U??Y = 


17 


X7;V?S 


AQdes 


i 


= KGII 


2 


LA 1 1 


3 


ZZK.K;B,DK 


4 


=£H£P£N$DDE 


5 


;£I*1£T£L$F 


6 


.?n:T:3*C:K<F 


7 


-:(n:T:fl,R:F 


8 


>$E$N//8$L=F 


9 


ZZHLS 


10 


>1E1B1F 


11 


♦ SE$B|IUK/Y» 


12 


ZZHKD; 


13 


9-ZZ 


14 


ZZH7S 


15 


2$n>n=a$R=v4 


16 


>:E:0<*B:F 


17 


= (P1(P(D- 


18 


0)U$K=C$F 


19 


8?3*N<*K:D* 


20 


8:N«J*K:D = 


21 


ZZK/D2 


22 


ZZH;S 


23 


3;C1<T<0«FK-Y7 


24 


ZZK*K/K;04 


25 


><E<B<F 


26 


-?3*TEI 


27 


>=E=B=L>F 


28 


42niTlClK(F 


29 


=<n<P<N*0DF 


30 


-2JGn>T>K(F 


31 


= 0J/N,3DI 


32 


-•J$n>T>R=Q=f 


33 


403/0, IQ(L(YH 


34 


ZZK.D5 


35 


=?:ud> 


36 


= $P1$P$D. 


37 


A?J*D> 


38 


>>E>B>F 


39 


=>n>p>o. 



40 
41 
42 
43 
44 
45 
46 
47 
48 
49 

50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 
65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 



==fl=P=D. 

= 4fl4P4D. 

>4E4B4F 

-♦PWT*R*F 

>*E*B*F 

=JJ£DG 

=*rup*D. 

2.3FT,K)F 

>633K?D6 

2733H5T5L7F 

>,E,N;BB,F 

-4M4T4R4Q1F 

= II«IIPID. 

♦ ,E,B,K;K*Y« 

>FEFBFF 

3<n<T<0«FK»F 

=GnGPGDN 

>£E£B£F 

49H9T9D8 

2BCI:n=Dl 

>83=D7 

/£P1£T£KSF 

sFPIFPFDO 

483=Q9QAK0F 

2BPI:n=Dl 

6C3CD9 

=2N(?DH 

»-E-B-F 

583 »DC 

-£ri£T£R£F 

=83=N03DI 

>9E9B9F 

=9ri9P9D. 

0CU=K>C=D2 

= iP1»P:D. 

=633DL 

>5E5B5F 

=5ri5P5D. 

=-n-P-D. 

>A/B/F 

*/m/p/D. 

3DEDn<RDK«Dn 
-(M(T(R(F 
52L(F 
>3E3B3F 
= 3f13P3D. 
>GEGBGF 
>HEHBHF 
-IPIIRIF 
sHClHPHD. 
>EIBIF 
=iniPlD. 
>?3*D> 
>(C(B(F 
,:E:N«£L«F 
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AVENTURASNASELVA 



Vejamos entao como a coisa se pas- 
sa. A ideia de um adventure tupiniquim 
nasceu da dificuldade de se encontrar es- 
ses jogos em portugues (mesmo quando 
isso ocorre, sao quase todos traduces 
do ingles). Ora. pode-se traduzir uma 
frase de uma lingua para outra, mas e 
muito difi'cil traduzir um universo estra- 
nho a n6s. Aqui o que importa sa"o as 
sutilezas do dia-a-dia, nao a traducSo, 
mas o significado que uma frase tern. A 
partir dai, o passo seguinte foi pesquisar 
como esses jogos sa"o escntos, a estrutu- 
ra dos programas e a sistemitica de ope- 
racoes. 

Dessa pesquisa surgiram alguns con- 
ceitos basicos, baseados no que ja existe, 



em termos de programa, no mercado 
atual. Sao eles: 

• Compactacdo: o programa deve ser 
compacto o suficiente para que o enre- 
do nfo fique prejudicado por falta de 
memona ; 

• Versatilidade : deve ser possi'vel alte- 
rar, ou mesmo reescrever o enredo.sem 
que isso agnifique mudancas na estru- 
tura do programa; 

• Agilidade: o programa deve ser agil 
para nao perder tempo em opera cOes 
complexas; 

• Poder de acao: possibilitar que acoes 
complexas sejam executadas sem que is- 
so exija alteracOes na estrutura onginal 
do programa. 



resultado disso ai esta. £ impor- 
tante lembrar que nao se trata de um 
programa prodigo em situacoes, mas ja 
da ora gente se divertir um bocado. 

ESTRUTURA E FUNCIONALIDADE 

Para que tudo funcione perfeitamen- 
te, 6 preaso antes estabelecermos certas 
convencOes. A mais importante delas diz 
respeito ao modo de construcSo de uma 
frase. O sistema s6 podera processar fra- 
ses simples e diretas, construi'das com 
acao + objeto (verbo + substantivo). 
sempre nessa ordem. Exemplos: 
• DE uma OLHADA na CANETA - 
Esta frase n2o pode ser processada cor- 



Sistema Operacional 



1 REn SIST. OPERACIONAL - V. 1 

2 REM 

3 REC1 HICRO SISTEMAS - 1983 

4 REn RENATO DEGIOUANI 

5 REPI 

6 SAVE "AUENTURAS NA SELUA" 

8 LET E=C0DE "" 

9 LET Y=UAL "5" 

10 LET P=Y/Y 

11 DIP! Ul(0) 

12 FOR A=P TO 

13 LET U$(A)=0S(A) 

14 NEXT A 

15 LET R=E 

16 LET K=VAL "11" 

17 Din T(Y) 

18 Din R$(C0DE "=") 

19 GOSUB UAL "500" 

20 IF NOT CODE R$(l) THEN GOTO 
30 

21 IF R$(2)<>" " AND U$(l)='W 
THEN GOTO 30 

22 FOR A=6 TO 18 

23 PRINT AT A,0; " 

24 NEXT A 

26 PRINT AT 6,0;">ESTA HUITO E 

5CUR0 AQULE NELHORARRANJAR UWA 

LUZ OU PODEREnOS TER PROBLEMS 
, ii 

27 LET Y=Y-1 

28 IF Y THEN GOTO 30 

29 GOTO 500 

30 INPUT U$ 

31 CLS 

32 PRINT "E";uS;"[J" 

33 FOR A=0 TO 31 

34 PRINT AT 4,A;"B";AT 19, A; "H 

35 NEXT A 

36 PRINT AT 6,0; ">"; 

37 LET T(l)=T(l)*l 

38 IF T(2) THEN GOTO 600 

40 IF U$<>"" THEN GOTO 50 

41 GOSUB UAL "P«10*5000" 

42 GOTO CODE " = " 

50 LET C=l 

51 GOSUB 90 

52 FOR A=l TO X 

53 IF A$=XS(A,2 TO ) THEN GOTO 
60 

54 NEXT A 

55 IF<C LEN U$ THEN GOTO 51 

56 PRINT "PERDAO, NAO ENTENDL 

M 

57 GOTO CODE •»■ 



60 LET BS=CHR$ CODE X|(A)*" " 

61 IF C>=LEN U$ THEN GOTO 74 

62 GOSUB 90 

63 FOR A=l TO 

64 LET B=UAL 0$(A,2)*2 

65 IF A$=0S(A,B TO B*4) THEN G 
0T0 70 

66 NEXT A 

67 IF C<LEN Ul THEN GOTO 62 

68 GOTO 74 

70 LET B$(2)=CHR$ (A*K) 

74 LET Q=0*(UI(LEN U$)="?") 

75 IF CODE BS»17 THEN GOTO 100 

76 LET A=C0DE BS-K 

77 LET C=COOE P$(P,A)-K 

78 IF C<1 THEN GOTO 85 

79 "IF C>128 THEN GOTO 82 

80 LET P=C 

81 GOTO 41 

82 FOR A=l TO n 

83 IF A=C-128 THEN GOTO 88 

84 NEXT A 

85 PRINT "ISTO NAO E POSSIUEL. 
ii 

86 GOTO 20 

88 LET US=n$(A) 

89 GOTO 120 

90 LET AS="" 

91 FOR A=C TO LEN US 

92 LET AS=AS*U$(A) 

93 IF NOT CODE Ul(A) THEN GOTO 
95 

94 NEXT A 

95 LET C=A + 1 

96 LET A$=A$+" " 

97 LET A$=A$( TO 5) 
99 RETURN 

100 IF B$(l)="<" THEN GOTO 400 

101 IF BS(l)="*" THEN GOTO 450 

102 IF Bf(l)="B" THEN GOTO 410 

110 FOR C=l TO D 

111 IF Bl=Dl(C, TO 2) THEN GOTO 
119 

112 NEXT C 

113 IF NOT Q THEN GOTO 85 

114 PRINT "NAO SEI." 

115 GOTO 20 

119 LET US=D$(C,3 TO ) 

120 LET U$=U$*"I " 

121 LET B=l 

122 IF NOT CODE U$(B) THEN GOTO 
113 

123 LET A=C0DE U$(B*1)-K 

124 LET Z=0 

125 GOSUB (CODE U|(B)-25)«10 



126 IF Z THEN GOTO Z 

127 LET B=B*2 

128 GOTO 122 

130 PRINT "NOS TEnOS:",,,, 

131 FOR A=l TO 

132 IF U$(A)="«" THEN GOSUB 137 

133 NEXT A 

134 IF LEN B$ THEN PRINT " N 
ADA." 

135 RETURN 

137 LET B$="" 

138 PRINT " "; 0$(A,3 TO ) 

139 RETURN 

140 IF U$(A)="B" THEN GOTO 148 

141 IF R<5 THEN GOTO 146 

142 PRINT "NAO DA PRA CARREGAR 
nAIS NADA." 

143 GOTO 210 

146 LET US(A)="H" 

147 LET R=R*1 

148 LET E=A 

149 RETURN 

150 IF U$(A)="B" THEN GOTO 154 

151 PRINT "NOS NAO TEnOS ";0$(A 
,3 TO ) 

152 GOTO 210 

154 LET U8(A)=CHR$ (P*K) 

155 LET R=R-1 

156 RETURN 

160 GOSUB 1000*A»10 

161 GOTO 210 

17p IF CODE Ul(A)-K=P OR CODE U 
S(A)-K=Pfl28 OR Ul(A)="B" THEN R 
ETURN 

171 PRINT "EU NAO UEJO ";0S(A,3 
TO ) 

172 GOTO 210 

180 PRINT "OKAY." 

181 GOTO 210 

190 PRINT "NE5TE LOCAL TE«I%,, 

191 FOR A=l TO 

192 IF CODE U$(A)-K=P THEN GOSU 
B 137 

193 NEXT A 

194 IF LEN B$ THEN PRINT " N 
ADA INTERESSANTE-" 

195 RETURN 

200 LET P=A 

201 RETURN 

210 LET Z=20 

211 RETURN 

220 IF A=P THEN RETURN 

221 LET Z=85 

222 RETURN 

230 LET R|(A)="L" 

231 RETURN 



50 



MICRO SISTEMAS. agosto/83 



retamente pois ha duas acoes: DAR e 
OLHAR. 

• EXAMINE a CANETA - ideal e 
construir a aca"o diretamente, o mais 
simples possivel. 

• ATIRE com o REVOLVER - 
sistema s6 reconhece a acao e o objeto. 
Esta frase pode significar "dar um tiro 
com o revdlver" ou "jogar o rev61ver em 
algum lugar". 

• DISPARE o REVOLVER - Nao ha 
duvidas quanto a acio a ser executada 

fundamental e" ser claro nas inten 
cOes. Boas frases produzem bons resul 
tados. Ha momentos, pore"m, que uma. 
acao exige a manipulaca"o de dois ob 
jetos: 



240 


LET RS(A)=" " 


241 


RETURN 


250 


IF U$(A)='W THEN RETURN 


251 


GOSIJB 151 


252 


GOTO 210 


260 


LET B=B*1 


261 


IF CODE R$(A) THEN RETURN 


262 


LET A=C0DE Ui(B*l)-K 


26 3 


GOTO 160 


270 


LET B=B*1 


271 


IF NOT CODE Rl(A) THEN RETU 


RN 




272 


COTO 262 


280 


LET E=A 


281 


RETURN 


290 


LET Ul(A)=CHR$ (P*K) 


291 


RETURN 


300 


IF U$(A)='W THEN LET R = R-1 


301 


LET US(A)=" " 


302 


RETURN 


310 


LET Z=41 


311 


RETURN 


320 


IF A=E THEN RETURN 


321 


PRINT "PARA I5S0 EU UOU PRE 


CISAR DE",0S(A,3 TO ) 


322 


GOTO 210 


330 


IF A=E THEN RETURN 


331 


LET U$="C"*CHRf (E*K)*"F" 


332 


GOTO 371 


340 LETT T(A)=T(A)-1 


341 


RETURN 


350 


LET B=B*1 


351 


LET T(A)=COOE Ul(B*l)-K 


352 


RETURN 


360 


LET B=B*1 


361 


IF T(A) THEN RETURN 


362 


LET A=C0DE U$(B+l)-K 
LET U$=D$(A,3 TO ) 


370 


371 


LET Z=120 


372 


RETURN 


380 


LET Z=7 


381 


RETURN 


400 


LET U$="C"*B$(2)*"F" 


401 


GOTO 420 


410 


LET U$ = "J3I1"*B$(2)*"R"*BS(2 


)*"V(X(:F" 


421 


GOTO 120 


450 


LET U$="E"*B$(2)»"DA" 


451 


GOTO 420 


500 


FOR A=l TO 


501 


IF U$(A)='W THEN LET U$(A) 


=CHR$ (P*K) 


502 


NEXT A 


503 


LET R=0 


504 


GOTO 30 


600 


LET T(2)=T(2)-1 


601 


IF T(2) THEN GOTO 39 



COLOQUE a CANETA na MESA - Es- 

te tipo de ac3o deve ser desmembrado 
em duas acdes diretas: 
PEGUE a CANETA 
COLOQUE-a na MESA 

Isto funaona da seguinte forma: o jo- 
gador pode possuir um maximo de cinco 
objetos e as acOes de "pegar" objetos 
possuem duas fases distintas. Na pnmei- 
ra, o sistema pega um objeto e o "segu- 
ra nas maos". Ao pegar outro objeto, o 
sistema "guarda o pnmeiro" e "segura 
o outro nas ma"os". Assim, para o siste- 
ma entender o que "colocar na mesa" e' 
preciso que antes ele tenha a "caneta" 
nas maos. 

Para se movimentar, o jogador deve 
onentar-se pelos quatro pontos cardeais. 
Como o comando esta simphficado, nao 
ha" necessidade de digitar VA para o 
NORTE, basta apenas NORTE, e o sis- 
tema entendera como uma acao de mo- 
vimento na direcSo norte. As acOes de 
movimento, entretanto, na"o se restnn- 
gem apenas 2s direcoes: pode-se EN- 
TRAR, SAIR, SUBIR e DESCER de lu 
gares. 

A tecla ENTER, quando pressionada 
sem uma frase, produz o efeito da frase 
"faca uma descncSo do local onde esta- 
mos". A frase "EXAMINE o local" tern 
um desempenho muito lmportante. Ela 
faz uma listagem dos objetos que esta~o 
no local, mas apenas aqueles que chama- 



nam a atencao de um observador. Os 
objetos que normalmente pertencem ao 
local n3o sa"o listados por essa frase. Por 
exemplo: se estive"ssemos numa livrana. 
obviamente havena hvros, mas um hqui- 
dificador chamana a nossa atencSo. 

COMO JOGAR 

Jogar um Adventure exige uma s£rie 
de consideracoes, todas elas bgadas ao 
nosso cotidiano. Este programa foi es- 
cnto para tentar reproduar ao maximo 
uma situacao real, sem monstros, armas 
a laser ou seres extraterrestres. Um pas- 
seio pela selva pode ser divertido, mas 
tambe"m pode se tornar um pesadelo. 
Tudo o que acontecer sera um reflexo 
das atitudes tomadas pelo jogador frente 
a uma determinada situacSo. ideal e' 
imaginar-se na pele de um ser que tern o 
computador como olhos, bracos e per- 
nas. Ao jogador cabe a tarefa de coman- 
dar o computador, de raciocinar e tornar 
as decisoes. computador apenas exe- 
cuta as ordens, ele nSo quesuona a vali- 
dade da acao e nem tira conclusoes. 

Para cada ordem havera sempre uma 
resposta, e quando o computador in for- 
ma que nao e' possivel executar uma 
ac3o, ou que ele nSo entendeu, talvez a 
ac2o nSo esteja bem estruturada na fra- 
se. De qualquer modo, ha sempre a pos- 
sibilidade do computador responder a 
uma pergunta (toda pergunta termina 



Monitor 



9000 REH *•#•*»*••»•*•♦»*♦•* 

9001 RED « MONITOR - V.l » 

9002 RED »*»»***»*»** »*•»»» » 

9010 PRINT ,,"NUnER0 DE P05IC0ES 
. ■• 

9011 INPUT P 

9012 PRINT P 

9013 PRINT , f "DIGITE OS CODIGOS 
DE POSICAO" 

9014 Din P$(P,6) 

9015 FOR A=l TO P 

9016 SCROLL 

9017 PRINT A; TAB 4; 

9018 INPUT P$(A) 

9019 PRINT P$(A) 

9020 NEXT A 

9021 CLS 

9022 PRINT ,,"NUf1ER0 DE OBJETOS: 

9023 INPUT 

9024 PRINT 

9025 PRINT ,,"DIGITE OS 0B3ET0S" 

9026 Dim 0$(0,14) 

9027 FOR A=l TO 

9028 SCROLL 

9029 PRINT A; TAB 4; 

9030 INPUT 0|{A' 

9031 PRINT 0$(a; 

9032 NEXT A 

9033 CLS 

9034 PRINT ,,"NUOER0 DE PALAURAS 
: "» 

9035 INPUT X 

9036 PRINT X 

9037 PRINT ,,"DIGITE AS PALAURAS 
■i 

9038 Din X$(X,6) 



9039 FOR A=l TO X 

9040 SCROLL 

9041 PRINT A; TAB 4; 

9042 INPUT X$(A) 

9043 PRINT X$(A) 

9044 NEXT A 

9045 CLS 

9046 PRINT .."nOVIdENTOS CONOICI 
ONAIS: "; 

9047 INPUT H 

9048 PRINT PI 

9049 PRINT ,,"DIGITE OS flOUII'lENT 
OS" 

9050 Din nl(n,8) 

9051 FOR A=l TO H 

9052 SCROLL 

9053 PRINT A; TAB 4; 

9054 INPUT n$(Aj 

9055 PRINT n$(A; 

9056 NEXT A 

9057 CLS 

9058 PRINT ,,"NUriER0 DE ACOES: 

9059 INPUT D 

9060 PRINT D 

9061 PRINT ,,"DIGITE AS ACOES" 

9062 Din D$(D,13) 

9063 FOR A=l TO D 

9064 SCROLL 

9065 PRINT A; TAB 4; 

9066 INPUT D$(A' 

9067 PRINT D$(A] 

9068 NEXT A 

9069 CLS 

9070 PRINT ,,,,,, "NAO UTILIZE 
RUN"" NEW ""CLEAR""." 
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AVENTURASNASELVA 



com ?). Na pior das hipoteses, ele nao 
sabera a resposta. 

Aventuras na Selva € uma histona 
que se passa numa selva qualquer (po- 
dena ser na Amazonia) e o objetivo 6 
encontrar urn local onde se possa pedir 
socorro. Ha uma linica saida, e vanos 
modos de se chegar a ela: por deducfo, 
mtui^ao. raciocinio 16gico, expenencia, 
erro e acerto e ate* mesmo sorte. 

£ importante lr fazendo um mapa 
dos lugares por onde passar, mas isso 
deve ser feito com cuidado, pois na selva 
anda-se por tnlhas que as vezes fazem 
curvas sem percebermos. 

DKirrAcAo 

O programa esta dividido em tres par- 
tes: Sistema Operacional, Monitor e Ta- 
bela de Mensagens. 

Digite pnmeiro o Sistema Operacio- 
nal (ele 6 o ce"rebro do programa, a parte 
responsa"vel pelos cdlculos e pela execu- 
c3o das ac6es). A seguir digite o Monitor 
(ele serve apenas para receber osdiret6- 
rios onde estao codificadas as acoes). 
Grave em fita cassete essas duas partes 
pois elas servirao para outros programas. 

Digite RUN 9000 e comece a operar 
a entrada de dados dos diret6nos. Quan- 
do terminar, elimine o monitor apagan- 
do as linhas 9000 a 9070. Importante: 
NAO USE RUN NEM CLEAR. 

Digite a Tabela de Mensagens e grave 
o programa em fita usando GOTO 1 . Se 
ocon-er uma parada durante a execucao 
do programa, GOTO 7 provocara o rei- 
nicio da partida, e GOTO 20 recomeca- 
ra o jogo no ponto onde ele foi mter- 
rompido. 

Um lembrete: a digitacSo deste pro- 
grama 6 cri'tica. Se ocorrer algum erro 
ou mesmo um linico carater trocado, o 
sistema talvez nao pare, mas funcionara' 
de modo diferente e 6 praticamente im- 
possi'vel saber o que acontecera\ Boa 
Sorte! 



Renato Degiovani 4 formado em Comunica- 
gSo Visual e Desenho Industrial pela Pontifi- 
da Umversidade Catdlica do Rio de Janeiro. 
Ha" mais de um ano utiliza microcomputado- 
res para ca"lculos na a"rea em que atua. 



1010 PRINT "IST0 NAO VA I SER P0S 


1210 PRINT "UOCE E Ufl LOUCO, WAS 


SIVEL." 


OS INDIOS RECONHECEI"! A SUA BRAV 


1015 RETURN 


URA E M ,"ELEGEm 5EU NOVO CHEFE. 


1020 PRINT "POR AQUI NAO HA SAID 


" 


A." 


1215 RETURN 


1025 RETURN 


1220 PRINT "ELE ESTA ABERTO, HAS 


1030 PRINT "ESTA PASSAGED ESTA 8 


UH RUID0","ESTRANH0 VEIO DA SAL 


L0QUEADA. PARA PASSAR TEREDOS Q 


A AO LADO." 


UE CAVAR." 


1225 RETURN 


1035 RETURN 


1230 PRINT "HAS QUE E ISSO? PA 


1040 PRINT "A PORTA ESTA FECHADA 


RECE QUE","H0UVE UH DESABAP1ENT0 


.» 


NA PASSAGEHOESTE." 


1045 RETURN 


1235 RETURN 


1050 PRINT "NAO EXISTE UdA TRILH 


1240 PRINT "ELE E I1UIT0 PESADO P 


A QUE SIGA NESSA DIRECA0." 


ARA SER", "CARREGADO." 


1055 RETURN 


1245 RETURN 


1060 PRINT "NAO EXISTE NENHUNA P 


1250 PRINT ,,,,"0NDE HA BARRO E 


0NTE ONDE POSSAflOS ATRAVESSAR." 


LAMA","E SOL POUCO BRILHA","0 


1065 RETURN 


CAP1INH0 E SEGUR0","nESD0 SEPI TRI 


1070 PRINT "ELA E I1UIT0 GRANDE." 


LHA..." 


1075 RETURN 


1255 RETURN 


1080 PRINT "IST0 E ItUITO ESTRANH 


1260 PRINT "GRANDE ATLETA... HAS 


0, WAS SE VOCE OUER, EU FAREI." 


ISSO NAO VAI DAR CERTO." 


1085 RETURN 


1265 RETURN 


1090 PRINT "VOCE DESC03RIU UMA P 


1270 PRINT "ACHEI QUE VOCE QUE 


ASSAGEH QUEVAI DAR NUC1 SUBTERRAN 


RIA." 


E0. " 


1275 RETURN 


1095 RETURN 


1280 PRINT "ELE PODE FICAR FURIO 


1100 PRINT "PARA ISSO PRECISAREN 


SO SE EU FIZER ISSO." 


OS DE UPIA C0RDA." 


1285 RETURN 


1105 RETURN 


1290 PRINT "A TAflPA ESTA QUEBRAD 


1110 PRINT " N", f " 0*L","*-« X 


A." 


"," S",".",TAB CODE "$";"...." 


1295 RETURN 


,TAB UAL "10";"> .." 


1300 PRINT "ELA ESTA APAGADA." 


1115 RETURN 


1305 RETURN 


1120 PRINT "ELA ESTA ANARRADA NU 


1310 PRINT "ELA ESTA ACE5A." 


P1A PEDRA." 


1315 RETURN 


1125 RETURN 


1320 PRINT "ELE ESTA DESCARREGAD 


1130 PRINT "OS INDI0S NAO DEIXAM 


0." 


NINGUEI»I","PEGAR SEUS 0B3ET0S DE 


1325 RETURN 


PESCA." 


1330 PRINT "ELE ESTA TODO QUEBRA 


1135 RETURN 


DO." 


1140 PRINT "IST0 IRRIT0U OS INDI 


1335 RETURN 


OS E ELES QUEREM C0RTAR SUA CAB 


1340 PRINT "A PORTA ESTA ABERTA. 


ECA. VAH0S DAR F0RA DAQUI." 


n 


1145 RETURN 


1345 RETURN 


1150 PRINT "EU NAO SEI NADAR." 


1350 PRINT "ELE ESTA ABERTO." 


1155 RETURN 


1355 RETURN 


1160 PRINT "E APENAS ";0$(E,3 TO 


1360 PRINT "ELE ESTA FECHAD0-" 


) ."conuci." 


1365 RETURN 


1165 RETURN 


1370 PRINT "ELE AGRADECE PIUITO E 


1170 PRINT "ELE ESTA CARREGADO." 


LHE DA UPI PRESENTE." 


1175 RETURN 


1375 RETURN 


1180 PRINT "ISTO EU NAO SEI FAZE 


1380 PRINT "ELE E NUITO ESTRANHO 


R." 


E HA UHA ESPECIE DE nECANISdO 


1185 RETURN 


ATRAS DE SUA BASE." 


1190 PRINT "GRANDE IDEIA..." 


1385 RETURN 


1195 RETURN 


1390 PRINT "UFA... ESSA FOI POR 


1200 PRINT "OS INDIOS ESTAO FURI 


POUCO." 


OSOS E NAO DEIXAfl NINGUEd ENTRAR 


1395 RETURN 


NA ALDEIA." 


1400 PRINT "ELE E DE OURQ. " 


1205 RETURN 

1 


1405 RETURN 




MAOS A OBRA! 

Estamos esperando sua colaboragao. Faga um jogo bem interessante e divertido e envie-o para 

MICRO SISTEMAS. £ sd enviar um texto explicativo, tirar uma listagem bem legivel e enviar para nds. 

E nao se esqueca de colocar seu nome completo, endereco e telefone de contato. 



Micro 



No Rio, em novo endereco: 
Rua Visconde Sifva. 25. 
Botafogo. CEP 22281. RJ. 
Tels.: (021) 246-3839 e 286-1797. 



Em Sao Paulo: 

Al. Gabriel Monteiro da Silva, 1229. 
Jardim Paulistano. CEP 01441. SP. 
Tel.: (011) 280-4144. 



52 



MICRO SISTEMAS, agosto/83 



Tabela de Mensagens 



1410 PRINT "ELA ESTA SORRINDO PA 
RA NOS." 
1415 RETURN 

5000 PRINT " AVENTURAS NA S 
ELVA",,,,,"VOCE ESTAVA VIAJANDO 
DE AVIAO E,DEVIDO A UP1A PANE.TEV 
E QUE FAZERUfH POUSO DE EHERGENCI 
A Efl PLENA SELVA.",,,,"SO VOCE S 
OBREVIVEU E AGORA TEW QUE ACHAR 

Ufl flEIO DE ESCAPAR DOSPERIGOS Q 
UE AGUARDAn.",,,"BOA SORTE..." 

5001 LET H|*"NOS ESTAHOS " 

5002 LET T(5)-3 
5005 RETURN 

5010 PRINT H|;"NUflA CLAREIRA."," 
AO HEU LADO ESTAO OS RESTOS DO 
AVIAO." 
5015 RETURN 

5020 PRINT "PARECE QUE NESTE LOC 
AL HOUVE UHDESnATAPlENTO. AINDA T 
Efl ALGUDAS ARVORES CORTADAS-" 
5025 RETURN 

5030 PRINT "NESTA SALA HA UCIA PE 
QUENA PORTAAO SUL-" 

5031 PRINT ,.,, 

5032 IF R|(5)="L" THEN GOTO 1340 
5035 GOTO 1040 

5040 PRINT "NESTE LOCAL A TRILHA 
SEGUE Efl TRES DIRECOES E A OES 
TE HA UCIA TRILHA QUE SOBE NUHA 
GRANDE", "SERRA." 
5045 RETURN 

5050 PRINT H$;"NO PONTO BAIS ALT 
DA SERRA. PODE-SE AVISTAR Un", 
"GRANDE LAGO AO NORTE." 
5055 RETURN 

5060 PRINT H$;"DIANTE DE UP! GRAN 
DEOBELISCO COfl ESTRANHAS","<"1ARCA 
COES." 
5065 RETURN 

5070 PRINT "AQUI DENTRO ESTA CIUI 
TO ESCURO. NAO DA PRA VER QUASE 
NADA." 

5071 IF U|(30)«»" " THEN PRINT , 
,"HA UNA COBRA AQUI- E MELHOR DA 
R FORA." 

5075 RETURN 

50B0 PRINT H$;"NO flEIO DO LAGO." 

5085 RETURN 

5090 PRINT "NESTA SALA HA UPI GRA 

NDE BAU." 

5095 RETURN 

5100 PRINT Hi; "EH BAIXO DE U1A", 
"GRANDE ARVORE. AO LADO DELA HA 

UCIA PEDRA ACHATADA." 

5101 IF R|(3)«"L" THEN PRINT ,," 
HA TAPIBEfl UltA PASSAGEP1 QUE VAI 
DAR NUH SUBTERRANEO." 

5105 RETURN 

5110 PRINT Hi; "DENTRO DA CIDADE. 

ESTA E A PRACA PRINCIPAL." 
5115 RETURN 



5120 PRINT H|;"NA PlARGECl OESTE D 
LAGO." 

5121 IF U|(2)«"«" THEN LET Ul(2) 

_n#n 

5125 RETURN 

5130 PRINT H|;"NUflA TUflBA REAL. 

HA Ufl SARCOFAGO NO l»!EIO DA SAL 
A." 
5135 RETURN 

5140 PRINT " ""ALELUIA""",,,,"P 
ARECE QUE CONSEGUIHOS. ", , ,H|; "NU 
PIA ESTRADA QUE TEPIUHA PLACA: 
"POSTO RODOVIARIO A100 METROS""" 
,,,, "AGORA ESTA"IOS SALVOS." 

5141 PRINT AT 20,0; "EU EXECUTEI 
";T(1);" ORDENS." 

5145 RETURN 

5150 PRINT "ISTO AQUI E UflA VELH 

A CABANA DECACADORES." 

5155 RETURN 

5160 PRINT H|;"NA HARGEn SUL DE 
UDGRANDE LAGO." 

5161 IF Ul(2)="«" THEN LET Ul(2) 

s" . " 

5165 RETURN 

5170 PRINT Hi; "DENTRO DO TEPIPLO. 

5175 RETURN 

5180 PRINT "NESTE LOCAL HA UNA C 

ACHOEIRA QUE FORP1A UH PEQUENO 

RIACHO." 

5185 RETURN 

5190 PRINT H|;"NUflA ANTIGA SALA 

DETORTURAS." 

5195 RETURN 

5200 PRINT Hi; "DENTRO DA CABANA 
DO CACIQUE-" 

5201 IF R|(ll)=" " AND R|(16)=" 
" THEN PRINT ,,"ELE ESTA QUEREND 
PRESENTES." 

5205 RETURN 

5210 PRINT H|;"NA ENTRADA DE UCIA 

", "CIDADE PERDIDA." 

5215 RETURN 

5220 PRINT Hi; "DENTRO DO AVIAO." 

5225 RETURN 

5230 PRINT "AQUI A P1ATA E NUITO 

FECHADA E",H|; "DO LADO DE FORA D 

E UCIA CAVERNA." 

5235 RETURN 

5240 PRINT Hl;"NA ENTRADA DE UCI 

PANTANO.SE NAO PUDER SE ORIENT 
ARCOM SEGURANCA, P0DEREP10S FICAR 

PERDIDOS NELE PARA SEflPRE. " 
5245 RETURN 

5250 PRINT H|;"NA FRENTE DE UHA" 
, "CABANA ABANDONADA." 
5255 RETURN 

5260 PRINT "NESTA SALA EXISTE UI1 
A ESTRANHA ESCADA DE PEDRA." 

5261 IF R|(3)="L" THEN PRINT ,," 
HA UNA PASSAGE!"! NO TOPO DESSA 



ESCADA." 
5265 RETURN 

5270 PRINT H|;"NA HARGEn NORTE D 
GRANDE LAGO." 

5271 IF U|(2)="«" THEN LET Ul(2) 
= " A" 

5275 RETURN 

5280 PRINT "AQUI HA UNA VELHA f!I 
NA DE OURO HAS PARECE QUE JA LEV 
ARAP1 TUDO." 
5285 RETURN 

5290 PRINT Hi; "NO TOPO DA SERRA. 
HA Ufl A8ISP10 QUE E HAIS ESTREI 
TOA OESTE." 
5295 RETURN 

5300 PRINT H|;"NU!1A GRANDE CAVER 
NAQUE TEH PASSAGENS PARA TODOS 
S LADOS." 
5305 RETURN 

5310 PRINT Hl;"NUMA ALDEIA DE"," 
INDIOS PESCADORES." 

5311 IF R|(ll)=" " THEN PRINT ,, 
"0 CACIQUE NOS CONVIDA PARA", "EN 
TRAR NA SUA CABANA." 

5315 RETURN 

5320 PRINT Hl;"NUP1A CLAREIRA. HA 
UflFOSSO AO SEU LADO "; 

5321 IF R|(6)="L" THEN PRINT "E 
UNA TRILHA AOESTE." 

5325 RETURN 

5330 PRINT "NESTA SALA TED ALGUN 

S 0B3ET0S ESPALHADOS PELO CHAO. 

■ 

5335 RETURN 

5340 PRINT Hi; "DO LADO DE FORA D 

E UPI ANTIGO TEWPLO." 

5345 RETURN 

5350 PRINT Hl;"NA PIARGEPI LESTE D 
GRANDE LAGO." 

5351 IF U|(2)="«" THEN LET Ul(2) 
= "I" 

5355 RETURN 

5360 PRINT "AQUI PARECE SER UfA 

SALA DE","ORACOES. HA UP! IDOLO B 

Efl NA SUA FRENTE." 

5365 RETURN 

5370 PRINT H|;"NUP1A ENCRUZILHADA 

5375 RETURN 

5380 PRINT "ESTAMOS ANDANDO NO P 

ANTANO.","ESPERO QUE SAIBA COflO 

SAIR DELE." 

5385 RETURN 

5390 PRINT " ""CUIDADO"",,H|; 

"NUHA TRILHA HUITO PERIGOSA," 

5395 RETURN 

5400 PRINT H|;"NUnA PEQUENA GRUT 

A ATRAS DA CACHOEIRA." 

5405 RETURN 



,«i 



M 

"^■S^MICROMAQ 



M 



A MICROMAQ (' a mais nova loja especializada em Micro 
Computadores, Software, Acess6rios, Treinamento, Livros, 
Revistas e Manutencao em Equipamentos Nacionais e Estran- 
geiros. 

RuaSetedeSetembron.°92 Loja 106 Centro Tel. : 222-6088 Rio de Janeiro RJ 
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LIVROS PARA TK, NE Z, CP 



APUCA0ES S&UAS 

C/programas listados por impressora. 

Folha de pagamento, balancete, contas a re- 

ceber, a pagar, corregao monetciria das contas 

do balango, correcao das contribuicoes do 

IAPAS, cadastro de clientes, conta bancSria, 

tabela price, estatfstica, corregao de provas, 

editor de textos, ram toper, sub-rotinas em 

cassette, chaining programas, contando os 

bytes das linhas, do programa, das matrizes, 

economizando mem6ria, etc... etc... 

Incluindo: 

Conhecendo a impressora, vale a pena? Veja 

amostra do papel. 

Projeto completo de teclado mecanico, com 

lay-out dos circuitos impressos, dos paineis e 

gabinete, etc... 

2.' Edicao Cr$ 4.800,00 



TRINTA JOGOS 

Incluindo programas em cddigo listados 
por impressora. 

Jogo de damas, labirinto, guerra nas estrelas, 
enterprise, paredao, demolidor, velha, cassi- 
no, roleta russa, corrida de cavalos, golf, vinte 
e urn, cubo magico, senha, banco imobiliSrio, 
bombardeio, som por software, etc... 
Lancamento Cr$ 2.500,00 



45 PROGRAMAS 

Prontos para rodar 

Arquivos, estoque, piano cont&bil, agenda te- 
lef6nica, invasores, caga ao pato, apague a tri- 
Iha, jogo da velha, forca, dado, tabelas, tabua- 
das, conversao de coordenadas, media, pro- 
gressao, fibonacci, biorritmo, renumerador de 
linhas em codigo, etc... etc... 
7.' Edigao Cr$ 4.000,00 



MICRON 

ELETRONICA COMERCIO E INDUSTRI A LTDA. 

Av. S. Joao, 74 - Telefone 22-4194 • S. Jose dos Campos 

Est. de Sao Paulo 




Pereira Filho, J. C. , 

"BASIC para 

micros pessoais", 

Editora Campus Ltda., 

CrS 3.950 PO (jul/83). 



Jorge da Cunha Pereira Filho 

BASIC 

PARA MICROS PESSOAIS 




EDITORA 

CAMPUS 



BASIC PARA MICROS PESSOAIS apresenta a lin- 
guagem BASIC de forma didatica e gradual. Atraves de 
exemplos, o leitor, utilizando o seu microcomputador 
pessoal, poder^ testar a aquisicao dos conhecimentos 
constantes do texto ao longo de seus dez capi'tulos, que 
alem desses exemplos para execucao em computador, 
trazem tambem exerci'cios subdivididos em duas partes: 
um guia de estudo dirigido e problemas para serem de- 
senvolvidose testados em microcomputador. 

guia de estudo dirigido se destina a ressaltar os prin- 
cipals conceitos e conhecimentos que o leitor assimila 
com a leitura dos capi'tulos. A seguir, vem os problemas 
e as solucoes aplicativas que ajudarao o leitor a manipu- 
lar a linguagem BASIC em situacoes diferentes. 

A linguagem utilizada e facil e direta, e mesmo aque- 
les que nao tern experiencia anterior em programacao 
poderao escrever os seus primeiros programas em BASIC 
utilizando um microcomputador pessoal. 

Em particular, o livro detalha as qualidades da lingua- 
gem BASIC dos pequenos microcomputadores pessoais 
do tipo teclado piano e similares, como TK82-C, TK85, 
CP-200, NE-Z8000, SINCLAIR ZX-80, ZX81, ZX 
SPECTRUN e TIMEX 1000. Mesmo para as pessoas que 
possuam micros de maior porte, este livro e muito util 
como introducso, ja" que estes apresentam em comum a 
maioria das facilidades dos pequenos micros. 

No primeiro capi'tulo o autor apresenta o microcom- 
putador (hardware e software) e dedica um item exclu- 
sivo para explicacao das especificidades dos micros pes- 
soais. Depois dessa explanapao inicial e esquematica, os 
capi'tulos seguintes tratarao: O teclado e seu uso; Ele- 
mentos da linguagem; Instrucoes Bcisicas; A tela e seu 
uso; Ceilculos Matematicos; Operacoes com cadeias de 
caracteres; Fungoes do usuario e sub-rotina; Operacoes 
com tabelas; Operacoes diversas. 
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VERBATIM 



PRODUZIDO NA ZONA FRANCA 
DE MANAUS SIGNIFICA: 
QUALIDADE COM 5 ANOS 
DE GARANTIA E O MELHOR 
PRECO DO MERCADO. 



ENTREGAIMEDIATA 



DATALIFE ~ diskettes sao produzidos com uma unica 

preocupacao: o armazenamento de dados sem erros. 

Esse comprometimento requer precisas tecnicas 

de producao e rigoroso controle de qualidade. 

DATALIFE " diskettes 8 ou 5 1 /4 polegadas tern 

certificacao 100% sem erros. 

A diferenca DATALIFE " e pura e simplesmente qualidade. 



FD 34 9000 


simples face/simples densidade 
26setores 128bytes/setor 8 polegadas 


FD34 8000 


simples face/dupla densidade 

N3o setonzado n3o formatado 8 polegadas 


DD 34-4026 


dupla face/dupla densidade 

26 setores 256 bytes/ setor 8 polegadas 


DD 34-4001 


dupla face/dupla densidade - N3o setonzado 

n3o formatado 8 polegadas 


Entrega a partir de setembro 1 .983 


MD 525-01 


simples face/dupla densidade 
5 1 /4 polegadas 


MD 550-01 


dupla face dupla densidade 5 1 4 polegadas 



Em embalagem 
Caixas plasticas 



de cartao com 10 unidades 
opcionais. 



Revendedores e Fabricantes interessados: 
te/: (01 V 262-5332 



PARA ENCOMENDAS FOR A DE SAO PAULO, 

A MEMPHIS PAG A A LIGACAO. 

DISQUE (011) 800-8462 



Distribuidor: Illemphis 

Industria e Comercio Ltda. 

Av. Arnolfo de Azevedo, 108 - Pacaembu - Sao Paulo - Brasil 

CEP 01236 - PABX (011) 262-5577 - Telex (011) 34545 

Filial Rio: Praia do Flamengo, 66 cj: 1519 Tel: (021) 205-3849 - 225-3469 

Matriz: Av. Angelica, 35 - Sta. Cecilia - Sao Paulo - Brasil - CEP 01227 



Como apostar ma is gastando menos? segredo esta no programa; os palpites 
com a calculadora e os 13 pontos, c/aro, serao seus\ 



A loteria da HP-41C 



Ricardo de Oliveira Ramos 



01 objetivo deste programa e re- 
duzir o preco de um jogo da 
Loteria Esportiva que tenha oi- 

to tnplos e um duplo, mantendo-se a 
mesma chance de acertar os 13 pontos. 
programa faz as 6561 combinac/Des 
possi'veis para oito tnplos e tm prime 
apenas as combina^oes que estejam den- 
tro de uma faixa de pontos de acordo 
com o gabanto de favontos. 

Na figura 1 temos um exemplo de jo- 
go. programa vai vanar as apostas 3, 
4. 5, 7, 9, 10, 1 1 e 12,sendo que as ou- 
tras serao fixas em todas as cartelas. Di- 
gamos que os favoritos sejam: 



Jogo 
Jogo 
Jogo 
Jogo 
Jogo 
Jogo 1 
Jogo 1 1 
Jogo 1 2 



Coluna 1 
Coluna X 
Coluna 2 
Coluna X 
Coluna 1 
Coluna 1 
Coluna 1 
Coluna 2 



Para cada cartela da variaclo e feito 
um somat6no de pontos. da seguinte 
forma: para cada jogo que coincida com 
o favonto soma-se dois pontos e quando 
na*o coincide, pordm esta pr6ximo, 6 
somado um ponto. Quando o favonto 
esta na Coluna 1 e a vanacSo na Coluna 
2, ou seja, estd longe, n§o e" somado ne- 
nhum ponto. Assim, o niimero maximo 
de pontos no somat6no i 16. 

Como sabemos, estatisticamente, 
mesmo que acertemos os cinco jogos fi- 



xos.a probabilidade e de apenas dois a 
quatro acertos entre os oito favontos. 
o que representa de sete a onze pontos 
de somat6no, em mddia. Portanto, voce 
podera fazer uma aposta com oito tn- 
plos e um duplo por um preco bem mais 
barato, tendo apenas que preencher va- 
nas cartelas. 

programa devera demorar cerca de 
1 1 horas para completar as 6561 vana- 
cQes e impnmir as cartelas. A cada vana- 



X 2 

X 

X X 

X X 

X X 

X X 

X X 

X X 

x X 

X X 

X 



cao ira aparecer no visor o seu respecti- 
ve niimero, de 1 a 6561. 
Rode o exemplo anterior como na figu- 
ra 2, e voce tera as seguintes cartelas 
com seus somatonos de pontos cones- 
pondentes (apenas as 1 1 pnmeiras va- 
nacSes): 



1111111 


1 


10. 


1111111 


X 


1 1 . 


1111111 


2 


1 2 . 


1 1 1 1 1 1 X 


1 


9 . 


1 1 1 1 1 1 X 


X 


1 . 


1 1 1 1 1 1 X 


2 


1 1 . 


1111112 


1 


8 . 


1111112 


X 


9 . 


1111112 


2 


10. 


11111X1 


1 


9 . 


11111X1 


X 


10. 



Para um mi'nimo de 10 e um miximo 
de 1 1 as cartelas serao: 



1 




1 


1 


10. 


1 




1 


X 


1 1 . 


1 




X 


X 


10. 


1 




X 


2 


1 1 . 


1 




2 


2 


10 . 


1 


X 


1 


X 


10. 


1 


X 


1 


2 


1 1 . 


1 


X 


X 


2 


10. 


1 


2 


1 


2 


10. 


X 


1 


1 


X 


10. 


X 


1 


1 


2 


1 1 . 



Figura 1 
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DISPLAY 


TECLAS 






XEQ 




ALFA LOT ALFA 




3 1 


SHIFT 


1 


R/S 


ENTRAR COH 

OS 

FAVORI TOS 


3 2 




X 


R/S 


3 3 


SHIFT 


2 


R/S 


3 * 




X 


R/S 


3 5 


SHIFT 


1 


R/S 


3 6 


SHIFT 


1 


R/S 


3 7 


SHIFT 


1 


R/S 


3 8 


SHIFT 


2 


R/S 


N. Hin. 







R/S 


H« Hiniio do 
Soiatorio 


N . Max . 




16 


R/S 


M* Haxiio do 
Soiatorio 



O programa foi elaborado de modo a 
agihzar o maximo possivel as operacoes 
e, em vista disso, foram eliminadas ins- 
tructs lentas, como per exemplo ISG e 
DSE. Ale"m disso, ele foi dotado de uma 
disposicao de r6tulos tal que a maquina 
nSo precisa fazer a procura, por estarem 
ate* 112 bytes pr6ximos da mstrucao de 
desvio (ver guia do usuario, secao 8). O 
programa requer urn m6dulo de mem6- 
na.impressora e SIZE 027. 

A todos voces, desejamos Boa Sdrte! 



Figura 2 



Ricardo de Oliveira Ramos 6 formado em En- 
gen ha ri a Civil pela Universidade de Brasilia 
e trabalha como Analista de Sistemas na 
ENCOL S/A. 





Prognosticos da Loteria Esportiva 




ei»LBL "LOT" 


48 STO 89 








191 BEEP 


32 PDV 


41 STO 18 






153 GTO 86 


192 BEEP 


83 CF 21 


42 STO 11 


79 XEQ 12 


116 RCL 88 


154 XEQ 82 


193 BEEP 


84 SF 12 


43 STO 12 


38 XEQ 12 


117 RCL 16 


155 )Wf? 


194 BEEF 


85 CLR 


44 STO 13 


81 XEQ 12 


118 Y,£Q 87 


156 GTO 86 


195 BEEP 


96 CLRG 


45 STO 14 


82 XEQ '12 


119 RCL 1? 


157 XEQ 82 


196 SF 21 


07 FIX 8 


46 STO 15 


83 XEQ 12 


128 RCL 88 


158 X*Y? 


197 OFF 


88 "1" 


47 STO 16 


84 XEQ 12 


121 CF 88 


159 GTO 86 


198*LBL 89 


89 PSTO 22 


48 GTO 86 


85 RCL 17 


!22 X<=V> 


168 XEQ 82 


199 PRONPT 


18 "X" 


49»LBL 12 


86 PCX 


123 XEQ 88 


161 X*Y* 


288 PSTO 12 


11 PSTO 23 


58 1 


87 PRBUF 


124 1 


162 GTO 06 


281 1 


12 "2" 


51 ST+ 25 


88 CF 21 


125 S\+ 26 


163 GTO F 


282 ST+ 08 


13 flSTO 24 


52 RCL IND 25 


89 1 


126 VIEH 26 


164*LBL 05 


283 CLR 


!4 PON 


53 21 


98 ST+ 28 


127 FS? 88 


165 1 


20* RRCL 12 


15 -Ji- 


54 + 


91 GTO 84 


128 GTO 83 


166 ST+ 16 


205 PSTO Y 


ll XEQ 89 


55 CLP 


92*LBL 86 


129*LBL 84 


167 GTO 06 


206 CLP 


17 -J2- 


56 RRCL IND X 


93 8 


138 RCL 16 


168*LBL 82 


207 PRCL 22 


18 XEQ 89 


57 PCP 


94 STO 17 


131 3 


169 1 


208 PSTO X 


19 -J3- 


58 RTN 


95 RCL 81 


132 X=V> 


178 STO IND 18 


209 X=Y^ 


28 XEP 89 


59*LBL 87 


96 RCL 89 


133 GTO 85 


171 ST* IND 19 


210 GTO 10 


21 "J4- 


68 - 


97 XEQ 87 


134 ! 


172 RCL IND 19 


211 CLP 


22 XEQ 89 


61 PBS 


98 RCL 82 


135 ST+ 16 


173 4 


212 PRCL 12 


23 -J5- 


62 2 


99 RCL 18 


136 GTO 86 


174 ENTERt 


213 PSTO Y 


24 XEQ 89 


63 - 


188 XEQ 87 


137*LBL 85 


175 1 


214 CLP 


25 -J6- 


64 PBS 


181 RCL 83 


138 16 


176 ST- 19 


215 PRCL 23 


26 XEQ 89 


65 ST* 17 


182 RCL 11 


130 STO 18 


177 ST- 18 


216 PSTO X 


27 "J7" 


66 RTN 


183 XEQ 87 


148 15 


178 RDN 


217 X=Y'> 


28. XEQ 89 


67*LBL 88 


184 RCL 04 


141 STO 19 


179 RTN 


218 GTO 11 


29 "JS" 


68 RCL 21 


105 RCL 12 


142 XEP 82 


180*LBL F 


219 3 


38 XEQ 89 


69 RCL 17 


186 XEQ 87 


143 X*Y? 


181 RCL 20 


228 STO IND 00 


31 fiOF? 


78 X<=Y? 


187 RCL 85 


144 GTO 86 


182 PCX 


221 RTN 


32 "N. HIN." 


71 SF 88 


188 RCL 13 


145 XEQ 82 


183 ■ JOGOS- 


222*LBL 18 


33 PROMPT 


72 RTN 


189 XEQ 87 


146 X*Y? 


184 PCP 


223 1 


34 STO 88 


73*LBL 83 


118 RCL 86 


147 GTO 86 


185 PDV 


224 STO IND 88 


35 "N. HfiX.' 


74 8 


111 RCL 14 


148 XEQ 82 


186 PDV 


225 RTN 


36 PROW! 


75 STO 25 


112 XEQ 87 


149 X*V> 


187 PDV 


226HBL 11 


3^ STO 21 


76 SF 21 


113 RCL 87 


158 GTO 86 


188 PDV 


227 2 


38 CLP 


11 XEQ 12 


114 RCL 15 


151 XEQ 82 


189 PDV 


228 STO IND 88 


39 1 


78 XEQ 12 


115 XEQ 87 


152 X*Y? 


198 CF 12 


229 END 



m 
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Muito utilizada para a programagao de jogos, FORTH e dez vezes 
mat's rapida e 40% mats compacta que o BASIC. 



FORTH: uma linguagem 
rapida e compacta 



Antonio Costa 



F~| ORTH e uma linguagem ideal para microcom- 
putadores por ser extremamente rapida e 
compacta. Devido a sua velocidade, FORTH 

tornou-se a linguagem preferida dos aficcionados de 
jogos de vi'deo e, caso voce tenha interesse na progra- 
macao de jogos, deve procurar conhece-la. 

Neste artigo, procuraremos explicar como usar um 
compilador FORTH em computadores que tenham 
por base o Z80. 

BASES DENUMERAQAO 

Em FORTH voce pode trabalhar em qualquer base 
de numeracao. Imediatamente apos ser carregada na 
memoria, a linguagem opera na base 16. Portanto, a 
primeira coisa a se fazer e passa-la para a base 10, o 
que e feito teclando: 

0A BASE • 

Seu sistema deve responder OK e comecar a operar 
na base 10. 

FORTH trabalha na notacao polonesa reversa, que 
foi inventada pelo filosofo Lukasiewicz e populariza- 
da pelas calculadoras HP. Por exemplo, se voce qui- 
ser multiplicar 3 por 4 em FORTH, basta teclar: 



3 4 



asterisco (*) efetua a multiplicacao enquanto 
que o ponto (.) imprime os resultados. 

Nao vamos nosalongar na explicacao de como os cal- 
culos sao realizados em FORTH. Gostariamos, entre- 



tanto, de informar que a linguagem so opera com in- 
teiros. Paradoxalmente, isto nao e uma limitacao e 
permite realizar, em menos tempo, calculos que em 
outras linguagens sao efetuados em ponto flutuante. 
Da mesma forma que as calculadoras HP, FORTH 
coloca os numeros que recebe via teclado numa pilha. 
Quando voce tecla . (ponto), o numero que esta no 
topo da pilha e retirado e lancado no video. Por 
exemplo, veja na f igura 1 o que ocorre se voce teclar 

586. 




Figura 1 



JARGAO TGCNICO ESPECfFICO 



Os programadores FORTH possuem um jargao tec- 
nico diferente do usado pelos adeptos de outras lin- 
guagens. aprendizado deste jargao e importante se 
voce quiser se comunicar com outros programadores 
de FORTH e ler artigos sobre a linguagem. 

Por exemplo, o topo da pilha e chamado TOS, en- 
quanto as outras posicoes sao denominadas20S, 30S, 
40Setc. 
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Os programas sao chamados palavras e sempre es- 
tao associados a urn nome. Vocabula'rio e como se 
chama o conjunto de palavras ativas num dado mo- 
mento. 

As palavras mais usadas no FORTH estao na figura 
2 a seguir: 




Figura 2 



! - armazena o 20S no endereco que esta no TOS; 
@- troca o endereco que esta no TOS pelo inteiro 
armazenado nele; 

EMIT — imprime o carater cujo codigo ASCII esta no 
TOS; 

C! — armazena o byte menos signif icativo do 20S no 
endereco que esta no TOS. Equivale ao POKE do 
BASIC; 

C@— troca o endereco que esta no TOS pelo byte 
armazenado nele. Equivale ao PEEK do BASIC; 
KEY - espera uma tecla ser apertada e coloca seu co- 
digo ASCII no TOS. 

O INTGRPRETE E O COMPILADOR 

Se teclarmos: 



Ele transformara todos os comandos entre o : e o 
; em linguagem de maquina e os armazenara numa 
regiao de memoria denominada dicionario. Como tal 
operacao e chamada compilacao, diz-se que : coloca 
FORTH no modo compilador e que ; o traz de volta 
ao modo interpretador. 

Apos a compilacao, QUAD R ADO passa a fazer par- 
te do vocabula'rio. Se por exemplo, teclamos: 

3 OUADRADO 

FORTH responded 9 OK. 

Vamos agora criar uma palavra para testar a veloci- 
dade do FORTH: 



VARIABLE X 
: TESTE 16000 
." TERMINEI" 



MO ) 4 • X ! LOOP 



16000 DO... LOOP e ."TERMINEI" sao equiva- 
lentes aos comandos FOR l=0 TO 16000.. .NEXT I e 
PRINT "TERMINEI" do BASIC. 

VARIABLE X cria uma variavel e a inicializa 
com 0, equivalendo aproximadamente ao VAR X: 
INTEGER; do Pascal. Quando voce tecla o nome de 
uma variavel, o endereco onde esta' o valor dela e pos- 
tonoTOS. 




Figura 3 

Na figura 3 podemos ver uma esquematizacao das 
operacbes realizadas pela seguinte sequencia: 



3 k 



A fim de comparar as velocidades do BASIC e do 
FORTH, execute a palavra TESTE e o seguinte pro- 
grama equivalente a ela : 



10 DEEINT A-Z 

20 FOR 1=0 TO 16000 

30 X 3»4 

^0 NEXT I 

50 PRINT " TERNINEI" 



3 DUP » . 

FORTH respondera 9 OK. Como ele esta interpre- 
tando comandos vindos diretamente do teclado, dize- 
mos que esta no modo interpretador. 

Porem, se teclamos: 

: OUADRADO DUP ■ . ; 



AS ESTRUTURAS DO FORTH 

Infelizmente n3o £ possfvel explicar o tunciona- 
mento do FORTH num unico artigo. Na tentativa de 
passar ao leitor algumas informacoes usando para isso 
o menor espaco possfvel, organizei uma tabela de Es- 
truturas comparadas das duas linguagens (figura 4) 
para dar uma ideia geral. 
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FORTH: UMA LINGUAGEM RAPIDA E COMPACTA 



FORTH 


BASIC 


: PI 5 DO I . LOOP I 


10 FOR 1-0 TO SiPRINT It NEXT I 


: P2 10 DO I . 2 ♦LOOP I 


10 FOR 1-0 TO 10 STEP 2 
20 PRINT I 
30 NEXT I 


i P3 10 DO I 5 > 

IF LEAVE THEN 
I . 
LOOP I 


10 FOR 1-0 TO 10 
20 IF I>5 GOTO 50 
30 PRINT I 
40 NEXT I 
SO END 


1 P4 X • > IP 1 . 

ELSE -1 . THEN ; 


10 IF X>0 PRINT 1 

ELSE PRINT -1 


i ps x • o< ip x • abs x : 

THEN ; 


10 IF X<0 THEN X-ABS(X) 
20 END 



Figura 4 - Estruturas do FORTH e do BASIC comparadas. 

Uma das caracten'sticas mais excitantes do FORTH 
e a possibilidade de estende-lo. Sem entrar em maio- 
res detalhes, vejamos como isto acontece. 

Suponhamos que voce precise de variaveis do tipo 
string (cadeia alfanumerica). Em FORTH nao existe 
este tipo de variavel. O que fazer? Antes de tudo, 
usando a extensibilidade da linguagem, crie urn co- 
mando equivalente ao DEFSTR do BASIC, tal como: 

: DEFSTR <BUILDS ALLOT DOES> + ; 

Onde ALLOT esta definida na listagem da Torre 
de Hanoi. Usando DEFSTR voce pode declarar uma 
variavel do tipo string da seguinte maneira: 

30 DEFSTR AS 

Para por a letra G na sexta posicao de A$, basta 
introduzir: 

KEY 6 AS C! 



E em seguida teclar G. O G pode ser recuperado te- 
clando: 

6 AS C@ EMIT 

Vamos ver agora o que faz o < BUI LDS... DOES > . 
Tudo o que esta' entre o < BUILDS e o DOES>e 
executado durante a declaracao da variavel. No nosso 
caso, ALLOT foi executado e reservou 30 bytes para 

AS. 

Quando a nova variaVel £ usada, o endereco de ini'- 

cio da area reservada a ela 6 posto no TOS e as pala- 
vras entre o DOES> e o ; sao executadas. Para enten- 
der melhor o que isto significa, examinemos o que 
acontece ao teclarmos: 

KEY 6 AS C! 

Inicialmente o + que esta entre o DOES> e o; 
soma 6 ao endereco deixado no TOS por AS, e o re- 
sultado desta operacao 3 o endereco do sexto carater 
do string. Em seguida, C! armazena o 20S (isto £ o 



carter lido por KEY) no endereco que esta' no 
TOS (isto e\ no endereco da sexta posicao do string). 
Da mesma maneira que criamos DEFSTR, pode- 
mos criar palavras para declarar listas, matrizes, pi- 
Ihas ou estruturas de controle do tipo REPEAT 
...UNTIL ou CASE. ..OF. Extremamente uteis na ela- 
boracao de jogos sao as palavras capazes de declarar 
variaveis do tipo figura. Eis uma destas palavras: 

: FIG <BUILDS DUP , DO C , LOOP DOES> 
DUP DUP @ + 2 + SWAP 2 + DO I C@EMIT 
LOOP CR ; 

Para declarar uma variavel chamada BOTE e inicia- 
la com a figura de um barco, teclamos: 

135 190 188 176 176 186 176 188 172 9 
FIG BOTE 

Onde os nove primeiros numeros sao os caracte- 
res ASCII que formam a figura. Apos a declaracao, 
cada vez que teclamos BOTE um barquinho sera de- 
senhado. 

A TORRE DE HANOI 



A fim de mostrar o FORTH em acao, escrevi um 
programa para resolver o clcissico problema da Torre 
de Hanoi e fornecer a solucao graficamente. Para os 
que nao conhecem a lenda da Torre, vou conta-la re- 
sumidamente. 

Dizem que em algum lugar do Oriente existe uma 
estrutura constituida por tres pinos. No primeiro de- 
les estao enfiados 64 discos como mostrados na figu- 
ra 5. Um grupo de monges foi encarregado de passar 
todos os discos para o segundo pino, movimentando 
um disco de cada vez e sem nunca colocar um maior 
sobre um menor. O terceiro pino pode ser usado para 
armazenar discos temporariamente. Reza a lenda que 
quando eles terminarem a Terra sera destrufda. Mais 
provavel £ que ela seja destrufda antes disso, visto que 
eles deverao mover os discos 18.446.744.073.709.551. 
615 vezes. 




Figura 5 — A Torre de Hanoi. 

O programa que desenvolvi consegue resolver este 
problema com ate 9 discos e faz uso de recursividade 
para obter a soluc§o. A limitacao no numero de dis- 
cos e imposta pelo tamanho do vfdeo. 

Para ativar o programa, voce deve teclar o numero 
de discos seguido da palavra TORRE. Por exemplo.i 
para resolver com seis discos, tecle: 
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Conheca 
todasopcoes 

em micro. 
Conheea 




a G)mputiqii& 



So no Brasil sao produzidos atualmente mais de 

30 tipos de microcomputadores. Todos com 

caracteristicas proprias, com softwares e 

perifericos especificos. 

Antes de comprar o seu, voce precisa analisar 

todas essas opcoes. Ou pode, simplesmente, 

procurar a Computique. 

A Computique fala a sua lingua, ajudando voce a 

escolher o equipamento e o software corretos. 

Oferecendo publicacoes especializadas e toda 

orientacao tecnica que voce precisar. 

Mostrando, de forma clara e objetiva, tudo que o 

micro pode fazer por voce. 
Na hora de escolher o seu micro, fale com quern 
entende. Fale com a Computique, a opcao total 

em microcomputacao. 



(gmputiquc 

O micro sem segredos. 



Sao Paulo: Rio de Janeiro: Campinas: Pocos de Caldas: 

Av. Angelica, 2578 Av. N. Sra. de Copacabana, 1417 Rua Conceive 224 Rua Prefeito Chagas, 252 
Fone (01 1) 231.3922 L. 303/304 - Fone (021) 267.1093 Fone (0192) 32.4445 Fone (035) 721.5810 






€! > Jk If""") 

vuuutW^^ IllLiiiiiiw Sistemas de Apoio a Decisao 



jssaiisisiiiiiit 

Visicalc - 4 e 5/08 

Visicalc A vancado - 12/08 

Basic - 08 a 26/08 

Desmistificando o Computador - 23/08 a 01/09 

Basic A vancado - 12/09 a 23/09 

Desmistificando o Computador - 13/09 a 22/09 

D Base II - 15 e 16/09 

Aplicacoes do Visicalc na Area Financeira - 23/09 

Aplicacoes Gerenciais em Microcomputadores - 26 a 30/09 

/nscricdes e /nformacdes: 

RUA GER MAINE BUR CHARD. 511 ■ PERDIZES ■ CEP 05002 

SAO PAULO - SP 

FONES: 8647799 - 65-6194 - 62-3600 



Entre o micro e o cassete: 



CMS 




CMS/ZX: CALIBRADOR E MODULADOR DE SINAL 



A POLIMICRO, criou o CMS/ZX 
urn calibrador e modulador de 
sinal de leitura de fitas magnet icas 
para microcomputadores de 
Idgica Sinclair, ou seja, o ZX 81 , 
o NEZ8000, oTK 82C 
eoCP200 
CMS/ZX 

O CMS/ZX. modulando o sinal 
e informando at raves de um V.U. 
se o seu programs esta sendo 
adequadamente transmitido, torna 
facil a leitura do microcomputador. 

O V.U. mede a intensidade do 
som, sendo ainda ef iciente na 






monitorizacao em casos de 
gravacao de programas e dados. 
A juncao do CMS/ZX aosistema e 
feito por dois fios, um ligado ao 
gravador e outro ao cassete. 

O CMS/ZX, aparel ho de 
tecnologia e desenvolvimento 
inteiramente nacional, traz um 
bom sinal ao seu micro. 



POLIMICRO 



Av. Andrade Neves, 1254 
Campinas - Fone: (0192) 80-822 



FORTH: UMA LINGUAGEM RAPIDA E COMPACTA 
6 TORRE 

desenho da torre de Hanoi aparecera na tela. 
Aperte qualquer tecla e o programa apresentara o 
primeiro movimento. Continue apertando uma tecla 
qualquer e a solucao sera apresentada passo a passo. 

Acred ito que alguns de voces gostariam de saber 
como calcular o numero de movimentos necessa'rios 
para se resolver o problema com 64 discos. £ possi- 
vel demonstrar que tal numero 6" dado por 2 64 . E 
como achar o valor de 2 64 ? Usando o programinha 
em F0RTHdafigura6. 



21 DEFSTR NUM 








: UM 1 NUM C 


21 1 DO I NUM C 


LOOP 




: PVAR 21 DO 


20 I - NUM Q© 4 8 + 


EMIT 


LOOP ; 


CVARIABLE VAIUM 






: 2VEZES VAIUM C 1 21 DO I NUM 


CO 2 


* 


VAIUM 


C© .+ 10 /MOD VAIUM 


C! 




I NUM 


C! LOOP ; 






:P2 UM 64 DO 


2VEZES LOOP CR PVAR ; 





Figura 6 

Neste programa, a palavra /MOD divide 20S pelo 
TOS e coloca o resto no 20S e o quociente no TOS; 
UM inicializa com 1 o numero de21 d igitos que esta 
no string NUM; PVAR imprime os d igitos de NUM 
em ordem reversa; CVARIABLE declara uma varia- 
vel de um byte; 2VEZES multiplica NUM por 2; e, 
finalmente, P2 calcula 2 64 . 



Torre de Hanoi (em Forth) 

: ALLOT DP • ♦ DP ' I 

: P1LHA 'BUILDS C, 1* ALLOT DOES I 

: PSH DUP DUP C0 I* DUP ROT C- * CI 1 

: PP DUP DUP C0 DUP 0» IF ." PILHOTA VAZIA" question 

ELSE DUP 1 - ROT C SWAP * C« 

THEN I 
: CVARIABLE <BUILDS 1 ALLOT DOES) I 

13 PILHA A IS PILHA B IS PILHA C 
CVARIABLE MPOS CVARIABLE VPOS 

VARIABLE INI VARIABLE FROM 9 VARIABLE TO 
VARIABLE SPARE VARIABLE N 

: PRTP HPOS C! VPOS C! DUP DUP C# DUP 
0- IF DROP DROP DROP 

ELSE ♦ 1* SWAP I* DO VPOS C0 MPOS C» 

PTC I C« 1* I DO 176 EMIT LOOP 
VPOS DUP C« I - SWAP C 
MPOS DUP C« 1* SWAP C 
LOOP 
THEN | 

i PRTPS PAGE 1 1 PTC INI • DUP . 14 INI • 

A IS 1 PRTP B IS 23 PRTP C 13 43 PRTP 
KEY DROP I 

: HANOI DUP N • OVER FROM ! 3 PICK TO • 4 PICK SPARE • 
DUP 1 - IF DROP PP SWAP PSH PRTPS DROP 

ELSE TO SPARE FROM N • I - HANOI 
DROP PP SWAP PSH PRTPS DROP 
FROM t TO SPARE N I - HANOI 
THEN DUP N • OVER FROM • 3 PICK TO ' 4 PICK SPARE 

: TORRE N ' INI ' A FROM ■ B TO • C SPARE • CR 
A C B C C C 

N0 I* I DO N I* I -2«A PSH LOOP 32 CURSOR • PRTPS 
SPARE TO FROM N HANOI 176 CURSOR ! I 



Antdnio Eduardo Costa Pereira 6 formado em Engenharia Eletrdnica 
pela Escola Polittcnica da USP a em Ffsica pelo Instituto de Fi'sica da 
USP. Fez mestrado em Sensoreamento Remoto no Instituto de Pesqui- 
sas Espaciais, em SSo Jose" dos Campos, SP, e Doutorado em Engenharia 
Eletrdnica na Cornell University, em Ithaca, Nova lorque (EUA). 
Atualmente e" professor da UN ESP. 
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A MAJOR VERSATIUDADE 
PELO MENOR PRECO. 



JP-01 eum 
computador pes- 
soal para uso em 
pequenas e 
medias em- 



presas que, 
por sua 
compatibili- 
dade com 
os sistemas 
e linguagens 
mais usados no 
Brasil, apresenta 
uma versatilidade 
impar. 

Na sua configura- 
c£o maxima permi- 
te ao usuario todas 
as combinacOes pos- 
siveis para a instala- 
cao de perifericos a 
sua escolha, uma vez 




que incorpora em 
seu circuitoas op- 
goes de RS-232 
(comunicagSo se- 
rial)*, controladores 
de disco de 5" ou 8", 
saida para tres mo- 
nitores simulta- 
neos, alta reso- 
lucSo de gra- 
f icos a cores 
e P&B, me- 
m6ria se- 
parada 
para gra- 
ficos, 
saida 
para 
mpres- 
sora 
paralela 
eRGB. 



OE 



iREgOS 



^ — i 10%dedesconto 

jjiEHJSJ Leasing ou financiamento em ate 24 meses 



JP-0116K(controlador) 

JP-J3T1 48K C/PARALE LA & FLOPPY 

RS-232 

RGBROM 

MONITORP&B 

IMPRESSORA132COL.FT/GT 



IMPRESSORA "DAISY WELL" 320ORTN 

1780RTN DOUBLER C/ "SOFTWARE" 580RTN 

2780RTN UNIDADEDE5"S/D 120ORTN 

230RTN UNIDADEDE5"D/D 150ORTN 

250RTN UNIDADEDE8"S/D 180ORTN 

220RTN UNIDADEDE8"D/D 240CRTN 

300ORTN DISCO RiGIDO (Winchester) 530ORTN 




Av Presidente Vargas, 41 8, 1 6° andar Rio de Janeiro - RJ 
Tel.: 253-0827 Telex 34213 PEDM-BR 



Veja quais sao as dificuldades de hardware e software encontradas para se 
implementar recursos graficos coloridos em micros pessoais. 



A implementacao da cor 



The/ma Vanderlinde 



Ivy I ma image m vale por mil pala- 
vras. Este velho ditado nunca 
| V^ I esteve tao presente no dia-a-dia 
dos computadores quanto agora. Gracas 
aos recentes avancos tecnol6gicos obser- 
vados na parte graTica destes equipamen- 
tos, o espectro de atuacao dos computa- 
dores cresceu muito, saindo do ambien- 
te puramente burocratico para entrar no 
mundo do desenho industrial e ate" do 
cinema. 

Na realidade, este ditado envolve 
duas caracten'sticas distintas da maqui- 
na: sua capacidade de apresentar deta- 
lhes na imagem, ou seja, seu ni'vel de re- 
solucao grafica, e sua capacidade de co- 
locar cores na imagem, isto e\ seu con- 
junto de cores. 

Neste artigo pretendemos descrever 
as principals dificuldades de hardware e 
software encontradas na implementaca"o 
de recursos graficos coloridos em mi- 



CTOcomputadores de uso pessoal. Antes, 
porCm, vamos conhecer o principio de 
funaonamento da televisao comercial 



comum. 



A TELEVISAO 



O funaonamento da televisao comer- 
cial comum baseia-se na propnedade 
que o olho humano tern de reter uma 
imagem estatica por um curto penbdo 
de tempo. Dentro desse principio 6 pos- 
si'vel dar-se uma impress3o de movi- 
mento atraves da apresentacao rapida e 
sucessiva de imagens estaticas. 

Esta ilus3o de otica ocorre com fre- 
quencias de apresentaca"o supenores a 20 
quadros por segundo. A televis2o comer- 
cial adotou como padrfo 30 quadros 
por segundo. O quadro de televisao, por 
sua vez, e formado por 525 linhas ligei- 
ramente inclinadas, que sa"o percorndas 
de cima para baixo e da esquerda para a 



direita por um feixe de ele'trons que sen- 
abiliza em maior ou menor intensidade 
as particulas de f6sforo situadas sobre o 
cinesc6pio, gerando uma imagem esta- 
tica. 

Para se conseguir a llusSo de movi- 
mento e necessdno, portanto, percorrer 
estas 525 linhas 30 vezes por segundo. 
Como 30 Hz, a frequencia de apresenta- 
cSo de quadros, nlo i muito comum em 
ambientes donuciliares, optou-se por 
dividir o quadro em dois campos entre- 
lacados de 262,5 linhas cada e estabele- 
cer uma frequencia de apresentacSo de 
campo de 60 Hz, a frequencia da rede 
ele'trica. Desta forma, percorrendo alter- 
nadamente os dois campos que corn- 
poem o quadro na frequencia da rede 
eletrica residencial, 60 Hz, consegue-se 
uma frequencia de apresentacSo de qua- 
dros de 30 Hz. A figura 1 exemplifies 
bem este fato. 
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PRIMEIRO CAMPO SEGUNDO CAMPO QUADRO COMPLETO 



Figura 1 - Formato de campo e quadro 
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FREQUfiNCIA 


PERlODO 


QUADRO 


30 Hz 


1/30 = 33,33 mseg 


LINHA 


30 


x 525 = 15750 Hz 


1/15750 = 63 pseg 



Figura 2 



Na figura 2 s9o fame ados alguns da- 
dos t^cnicos sobre a televisao para facili- 
tar a compreensSo do resto do artigo. 

Note que no pen'odo do quadro }£ es- 
ta sendo considerado o tempo de apaga- 
mento do feixe no seu retomo da base 
da tela ao topo e o sinal de sincronismo 
vertical; do mesmo modo, no pen'odo 
da hnha ja esta sendo considerado o 
tempo de apagamento de feixe no seu 
retorno da borda direita da tela a borda 
esquerda e o sinal de sincronismo ho- 
rizontal. 

DIFICULDADES DE HARDWARE 

Agora que conhecemos urn pouco 
mais sobre o funcionamento da televi- 
sao, vamos apresentar as dificuldades de 
hardware e software existentes na lmple- 
mentacao de recursos graficos em micro- 
computadores de uso pessoal que nor- 
malmente utilizam televisores comer- 
aais comuns como tela de video para 
apresentacSo de resultados. 

A nivel de hardware existem dois 
pontos cri'ticos: o primeiro, relacionado 
com a resolucao grafica e o segundo, 
com o numero de cores passiveis de 
apresentac3o. 

O micTOcomputador, por problemas 
inerentes a sua arquitetura de hardware, 
nao tern facilidade em apresentar dados 
em telas com varredura entrelacada. 
Portanto, para micros de uso pessoal os 
dois campos que compoem o quadro sa"o 
iguais, o que reduz pela metade a reso- 
lucao grafica no sentido vertical. Nor- 
malmente slo utilizadas em torno de 
200 linhas diferentes por quadro. 

A televisao comercial comum, por 
sua vez, possui uma banda de passagem 
de video em torno de 5 MHz, o que per- 
mite ao microcomputador enderecar no 
maximo 317 pontos (5000/15,750) por 
hnha. Normalmente sao utilizados em 
torno de 280 pontos por hnha. 

Em si'ntese, concluimos que a tela de 
maior resolucao grafica para micro- 
computadores de uso pessoal que utili- 
zam televisao comercial comum como 
video e" uma matnz de aproximadamen- 
te 280 x 200. No Apple II ela i de 280 
x 192 e no TRS-80 Color Computer, de 
256x192. 

Todo micro de uso pessoal possui 
uma memona de video que representa 
uma copia fiel das informacOes apresen- 
tadas na tela de video. £ a travel dessa 
memona que o microcomputador faz o 
refresh continuo da tela. Quando se 



trata de tela alfanume"nca, cada carater 
da tela ocupa uma posicao de memona 
de video e, consequentemente, uma tela 
formada por 24 linhas de 80 caracteres 
necessita de 1920 (24 x 80) posic5es de 
mem6na de video para ser mapeada. 

No caso de tela grafica, no entanto, o 
problema 6 lnteiramente diferente pois 
necessitamos identificar a cor de cada 
ponto da matnz. Portanto, urn micro 
com capacidade para 16 cores vai ne- 
cessitar de meio byte para identificar a 
cor de cada ponto da tela, o que implica 
no consumo de 28000 ((280 x 200)/2) 
posicoes de mem6na somente para o vi- 
deo. Como normalmente microcompu- 
tadores de uso pessoal nao possuem 
muita mem6na, isto 6 inviavel. 

A solucao para este impasse consiste 
em reduzir o numero de cores possiveis 
de serem utilizadas em telas de alta re- 
solucao. O Apple II possui 1 6 cores, mas 
so permite o uso de quatro na tela de 
alta resolucao 280 x 1 92 ;o TRS-80 Co- 
lor Computer, embora tenha nove co- 
res, so permite o uso de duas na tela de 
alta resolucao 256 x 192. 

DIFICULDADES DE SOFTWARE 

A implementacao de recursos grafi- 
cos em microcomputadores de uso pes- 
soal exigiu tambem um grande esforco 
no desenvolvimento de tdcnicas de soft- 
ware para manipulacao de telas graficas. 
Foi necessdrio cnar, a nivel de lingua- 
gem BASIC, a mais usual em micros, 
uma vasta gama de comandos que possi- 
bilitassem o manuseio de graficos. Co- 
mo nlo havia um padrao para estes co- 
mandos, cada fomecedor cnou o seu 
proprio conjunto e hoje n5o ha compa- 
tibilidade entre os programas desen- 
volvidos para um micro e outro. 

Pouco a pouco, no entanto, foram 
sendo definidas as caracteristicas basicas 
que uma linguagem de manipulacao de 
graficos deve possuir e a tendencia dos 
novos produtos 6 incorporar este con- 
junto basico de comandos e acrescentar 
mais alguns novos, especificos de cada 
fabncante. 

A seguir, relacionamos os comandos 
fundamentals para a manipulacao de 
graficos: 

• PONTO - deve permitir posicionar 
na tela um ponto de cor especificada pe- 
lo usuano a partir de suas coordenadas 
cartesian as; 

• LINHA - deve permitir posicionar 
na tela uma linha de cor especificada pe- 



lo usuano a partir das coordenadas car- 
te sianas de suas extremidades; 

• CIRCULO - deve permitir posicio- 
nar na tela um circulo ou arco de circu- 
lo de cor especificada pelo usuano a 
partir da coordenada cartesiana de seu 
centro e raio; 

• DESENHO - deve permitir deslocar 
um ponto sobre a tela relativamente a 
sua posicao antenor;este deslocamento 
deve ser possivel em oito sentidos dife- 
rentes (00,450,900, 1350, jgoo, 2250, 
270° e 315°) e ter compnmento vana- 
vel. 

O Apple II , por ser um dos pnmeiros 
micros de uso pessoal a surgir no merca- 
do, possui apenas parte destes coman- 
dos, o que dificulta bastante a manipu- 
lacao de suas caracteristicas graficas. Ja 
o TRS-80 Color Computer, um micro- 
computador mais recente, possui todos 
os comandos atados acima e mais al- 
guns. 

CONCLUSOES 

As pnncipais conclusSes que pode- 
mos extrair do que foi exposto s3o: 

- telas graficas com resolucao supenor 
a 280 x 200 nao podem ser apresenta- 
das em televisoes comerciais comuns, 
devemos usar monitores de video nestes 
casos; 

- telas graficas de alta resolucao com 
muitas cores nao s3o factiveis em micro- 
computadores de 8 bits, devido ao tama- 
nho da mem6na de video necessana pa- 
ra armazenar o mapa da tela e ao tempo 
disponivel para efetuar sua varredura; 
neste caso, devemos optar por micro- 
computadores de 16 bits que possuam 
fiequenaa de clock acima de 5 MHz; 

- o software para manipulacao grafica 
nao estd padromzado; devemos, entao, 
optar pela utilizacao daqueles que pos- 
suam no minimo os comandos PONTO, 
LINHA, CIRCULO e DESENHO, ]& que 
esta e a tendencia mundial. ■ 



Thelma Vanderiinde 4 Analista de Sistemas 
formada pela PUC/RJ. £ formada tambe'm em 
Fi'sica pela Faculdade de Humanidades Pedro 
II e em Miisica (Piano) pelo Conservatdrio 
Brasileiro de Musica. Trabalha atualmente no 
Departamento de Sistemas da Ceras Johnson e 
assessora a empresa Industrie e Come'rcio de 
Computadores Novo Tempo Ltda. na pesquisa 
e desenvolvimento de software para composi- 
qSo de musicas atrave"s de microcomputadores. 
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a 



MICROCOMPUTADORES 



.tf 



DGT-100 Cr$ 240.000, x 3 — Gratis 18 jogos 
CP 200 Cr$ 1 10.000. x 2 — Gratis 6 logos 
TK85 Cr$ 89.925, x 2 - Gratis 6 jogos 
TK82-C Cr$ 49.925. x 2 - Gratis 6 jogos 

ainda: UNITRON Ap II, Mem 64 K, 
Joystick, Impressoras. etc.. 

(Precos suieilos a modilicacoea) 



PROGRAMAS PRONTOS EM FITAS 



JOGOS 

VISITA AO CAMINO 

MIDWAY 

PASSAGEM PARA 

O INFINITO • 2* DIMENSAO^ 

10 JOGOS • JORNADA NAS 

EXCITANTES ESTRELAS 

PARA IK EMUITOMAIS! 



JOGOS: 

SCARFMAN 
PENETRATOR 
SUPERNOVA 
VIAGEM A VALKYRIA 
ASILO 1 
AVENTURAS 
DEFENSE COMMAND 
E MUITO MAIS' 



LEASING E CREDITO PIRETOl 



LITERATURA 

I MICROSISTEMAS 
i INTERFACE 
> JORNALTK-CP 
i IMPORTADOS 



+ CURSOS DE BASIC 

GRATIS 

NA COMPRA DE QUALQUER MICRO 



DESPACHAMOS PARA TODO O BRASIL! 



APLICATIVOS 
CONTROLE DE ESTOQUE 
CONTAS A PAGAR/RECEBER 
MALA DIRETA/CADASTRO 
FOLHA DE PAGAMENTO 
VIDEOCLUBES 
ESTATISTICOS 
SOFTWARE SOB ENCOMENDA 



RuadaLapa, 120 Gr. 505 
Rio de Janeiro • RJ 
Tel.: (021) 252-9057 



M 




ro 



Na materia Controle seu orcamento no TK e NE (MS 
n9 21, junho/83, p;§g. 10) as linhas 660, 683 e 814 saC- 
ram com erros. As linhas corretas sao as que seguem: 
650 GOSUB 100 
683 IF C=10 OR C=20 THEN GOTO 

688 
814 LET TT=TT+ST 

Na materia Desenhe e brinque com o micro, no mes- 
mo numero, ocorreram alguns erros a pag. 39. Logo no 
comeco da primeira coiuna, a linha 50 saiu com sinais de 
igual (= ) no lugar de asteriscos (*). A linha correta seria: 

50 IF (X*X)-f(Y*Y)>18*9 THEN GOTO 80 

No segundo paragrafo, na quarta e na quinta linha, a 
letra I foi substitufda pelo numero 1 em duas expressoes, 
que deveriam ser: 



21 



20 = 151 



H 



H 



E no Programa 16, na mesma pa'gina, a linha 30 cor- 
reta e a que segue: 
30 LET Y«IMT ( 2 2 - ( X - 32 ) * ( C - 2 2 ) / 3 2 ) 

Aos autores e leitores, nossas desculpas. 



A informatics chegou a administracao e nos iremos acompanhar 
passo a passo sua implantacao, em linguagem simples e objetiva. 



Informatica & 
Administracao 





Un^utnca^aoJaA^l^ltora 



Alameda Gabriel Monteiro da Silva, 1229 — (011) 280-4144 
Rua Visconde Silva, 25 — (021) 266-5703/246-3839 
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VENDAS DE MICROCOMPUTADORES 



• DESENVOLVIMENTO 
DE PROGRAM AS 

• PROGRAMAS 
COMERCIAIS E DE 
ENOENHARIA 





A nossa de- 
monstragao 
e personalizada com 
orientagao, pacien- 
cia, cortesia e boa vontade. 

REVENDA E ASSfSTENCIA TECNICA 
AUTORIZADA DIGITUS 



TESBI Engenharia de Telecom unicacoes Ltda. 

Rua Guilhermina, 638 - RJ. 

Tel.: (021) 591-3297 e 249-3166 / Caixa Postal 63008. 



Oass- 



MICROS, VIDEOS, GAMES & CIA. 

Computadores: Polymax, Unitron, Prologica, 
Micro Digital, Sysdata. 



^ OFERTA ESPECIAL "MAXXI" ft 

Videos: Philco e Sharp 

Televisores Sanyo 



Video Games: Dynacon, Atari. 
OFERTA: Cartuchos para Atari a preco de custo. 
Suprimentos: Fitas, Disquetes, 
Formularios. 



^ SUPER OFERTA ^ 

Disquete Memorex 5 1/4 Cr$ 5.000,00 

CURSOS: Basic I, Basic II - Inscricoes Abertas 



Rua Estados Unidos, 2141 

Tel. 852 8290 / 257-3952 / 231-1 1 73 



Por baixo 
deumbomi 
computador 
so pode existir 
uma mesa (KMM 



As Mesas para Terminais H&M sao tao boas quanto o 
seu computador. Sabe por que? Porque elas sao feitas 
com o mesmo know-how e o mesmo criterio de 
controle, seguranca e precisao, como sao feitos tambem 
os computadores. 

Alem disso, as Mesas para Terminais H&M possuem 
acabamento perfeito, fosfatizado e com fundo plaine. A 
base e de poliuretano na cor grafite e o painel na cor gelo. 
O tampo em todos os modelos e de madeira compensada 
de mogno ou virola, com revestimento de f6rmica fosca 
branca. 



Tudo isso com a qualidade, 
tecnologia e tradigao H&M que 
voce ja conhece, e que o seu 
computador esta esperando para 
conhecer. 
Consulte-nos pelo telefone ou oolicite 
a visita de um representante H&M. 



SEHHB 



Filiada a 
ANFORSAI 



Representantes em todo o Brasil 



HankaMaldonadoInd e Com. Ltda. SP: Lflo. Paissandu. 72 1 1 " S/1 1 1 2 Fones: 227 9925. 227 9060 e 227 8033 Cx Postal 7737 Telegramas "PASTANKA ' RJ: Av Franklin Roosevelt, 23 
8° S 809 Fones 220 91 79e220 7279 MG: Datamarketing Prod .pvProc de Dados LtdarR Alagoas. 1460 C| 903 Belo Hot nonte Fone 225 9871 CE: JoaoS BezerraJr R GuilhermeRo 
cha. 253 Fortaleza Fone 226 9328 ES: LGC Com eRepr Ltda. R. Alberto deOhveira Santos. 42 S/1416 Vitbna Fone: 223-1 1 24 PR: SIMIGRA Supr e Equip p ComputacaoLtda R 24 de 
Maio, 2937 Cuntiba Fone 224 9002 SC: SIMIGRA Supr eEquip p Computagao Ltda R OsmarCunha. 1 5 BlocoA 8° andar S 81 1 Flonanopolis Fone 23 1091 RS: Rosa Sapoiznyki R 
Venancio Aires. 495 apto 62 Porto Alegre Fone 21 6089 MTeMS: Fortaleza Com eRepr. Ltda R. Magnetite, 71 Campo Grande Fone 382 01 73 SE: AntunesRepr Ltd8 R Laranjeiras, 151 
2." andar Aracaju- Fone: 222 2307. PA: ORPASIS- Org ParaensedeSist. eServ Ltda Trav Pe Eutlquio. 2086 Belem Fone 222 9388 e 222 9669 BA: Jose Augusto Vasconcelos R doTira 
Chapeu.06 S 806 Salvador Fone 243 81 16 MA: ORMASIS Org Maranne/isedeSist. eServ Ltda Av Getulio Vargas. 1 746 SaoLuiz Fone: 222 021 7 DFeGO CHECKMATE Com eRepr 
Ltda SDS Setor de Diversoes Sul Bl. H-Lj.05- 1 ." e 2 ° subsolo ED. Venancit/ll Fone 226 3834 e 224 1657 AM. AC. ROeRR: Cap de Dados Ltda Av Costa eSilva. 680 Manaus Fone: 237- 
1033 e 237 1793 PE. AL. PBeRN: LUHE Com. eRepr R. Dr Miguel Vieira Ferreira. 4 1 6 Recife Fone: 228 3224 Santos e Cidades Vizinhas Jose Roberto F Rodngues R Egidio Martins. 149 
Ponta da Praia Santos Fone: 36 2 2 56 Campinas DIAP Distr de Art p, Escnt6noLtda R Jose Paulino. 582 Campinas (SPI ■ Fone: 32-41 33 



Saiba um pouco mais sobre as strings e descubra, por exemplo, 
como marcar a data e a hora no ini'cio do programa que voce estiver desenvolvendo. 



Conhecendo melhor as strings 



Roberto Quito de San t' Anna 



T~ alvez voce ]i saiba que as strings 
sab variaveis do tipo cadeia e 
que podem ser constituidas de 

caracteres alfanume'ncos, graficos, c6di- 
gos de controle e de compresslo de es- 
pacos. Entretanto, o que ate - mesmo 
muitos programadores expenentes des- 
conhecem 6 ser perfeitamente possivel 
descobnr a locahzacSo de uma string 
(melhor dizendo, de qualquer vanavel) 
na mem6na e alterar o seu valor para 
outro conteudo desejado, atravds das 
funcoes VARPTR, POKE e PEEK. 

Cada vanavel string 6 referenaada na 
mem6ria do CP-500 atrav^s de 3 bytes 
consecutivos: o pnmeiro byte conte'm o 
compnmento da string; o segundo, o 
valor do byte menos significativo (LSB); 
e o terceiro, o valor do byte mais signi- 
ficativo (MSB) do endereco do pnmeiro 
carater da string. Explicando melhor: 

• 1 9 byte - valor do compnmento da 
string 

• 29 byte - LSB do enderefo do pn- 
meiro carater da string 

• 39 byte — MSB do endereco do pn- 
meiro carater da string 

A funcSo VARPTR (A$) retorna o 
endereco do 19 byteacimareferenaado. 
Sendo assim, se temos: 

10 CLS: A$»"MICRO SISTEMAS" 
20 X-VARPTR(AS) 
30 COMP"PEEK(X) : PRINT COMP 
40 LSB«PEEK(X+1 ) : PRINT LSB 
50 MSB»PEEK(X+2) : PRINT MSB 
60 INICIO-256*MSB+LSB; PRINT INICIO 
RUN 



Vemos COMP=14 e, em INICIO, o 
endereco de mem6ria que cont^m o va- 
lor ASCII do primeiro cariter de AS, ou 
seja, M. Acrescentando uma linha ao 
programa, obtemos a lmpressao da letra 
M. Vejamos: 

70 PRINT CHR$(PEEK( INICIO) ) 
RUN 

Como INICIO conte'm o pnmeiro ca- 
rater de AS e o comprimento de AS 6 
14, para recuperar toda a string pode- 
mos fazer : 

70 FOR I-INICIO TO INICIO+13 
80 PRINT CHR$(PEEK(I) ); 
90 NEXT I 
RUN 

Gostou? Entfo expenmente agora o 
programa abaixo. Ao executa-lo, confor- 
me soliatado, entre com os seguintes 
numeros, exatamente nesta ordem: 78, 
79, 83, 83, 65, 32, 82, 69, 86, 73, 83, 
84, 65 e 33. 

10 CLS 

20 A$-"MICRO SISTEMAS" 

30 A-VARPTR(AS) 

40 X"256*PEEK(A+2)+PEEK(A+1 ) 

50 FOR K"0 TO LEN(A$)-1 

60 INPUT "ENTRE UM NUMERO ";N 

70 POKE X+K.N 

80 NEXT K 

90 PRINT AS 



Surpreso? Agora LIST ou LLIST o 

programa e observe bem a listagem. Vo- 
ce concorda com o que aparece agora no 
lugar de AS? £ isto ai - ... Conv^m ressal- 
tar que tudo o que foi dito ati enta"o € 
valido tamtam para o S-700. 

A mesma te"cnica podena ser usada 
para colocar, a partir de um endereco na 
mem6ria, os o6digos-objeto de uma sub- 
rotina em linguagem de ma'quina, a ser 
chamada atrave's de USR. 

Vejamos, entSo, uma interessante 
aplicac^o do que foi dito anteriormente 
a respeito de strings. 

PROTOCOLE OS SEUS PROGRAMAS 

Frequentemente, durante o desen- 
volvimento de um programa, ficamos 
confusos por nao conseguirmos identifi- 
car, dentre as divefsas versOes armazena- 
das (em fita, disco ou, pnncipalmente. 
listagens em papel), qual a mais recente 
ou mais atualizada. O programa apresen- 
tado na figura 1 pretende resolver de 
uma vez por todas este problema. 

Lembre-se que atrave's das te'cnicas 
descritas anteriormente, cada vez que o 
programa for executado sera feita a al- 



1 A$= "VERSAO ATUALIZADA ATE MM/DD/AA HH:MM:SS" 

2 A=VARPTR(A$):L=256*PEEK(A+2)+PEEK(A+1) 

3 B$=TIMES 

4 FOR 1=1 TO 17:11=1+21 :X*ASC(MID$(B$, 1,1 ) ) 

5 POKE L+II,X:NEXT I 



Figura I 
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teracao da string A$, na pr6pria lista- 
gem, com os valores da data e hora de 
execucSo. Este programa pode ser com- 
pactado em uma ou duas linhas e colo- 
cado ao initio de cada programa que se 
estiver desenvolvendo, manual ou auto- 
maticamente, atrave"s de MERGE. 

Obedecendo ngorosamente os espa- 
90s assinalados (por exemplo, 20 espa- 
cos entre o sinal =" e a string propna- 
mente dita), digite e execute o progra- 
ma. Voce vera* que, a cada execucSo, a 
string A$ sera modificada, mostrando 
nas poacOes correspondentes a MM/DD/ 
AA HH:MM:SS a data/hora da execucao. 
Em seguida LLIST, CSAVE ou SAVE 
a vontade, e voce sabera" sempre a ordem 
cronol6gica de seus programas. unico 
problema 6 que, a partir de agora, voce 
nao podera - mais embromar o seu micro 
quando tiver que fornecer a data e a 
hora... ■ 



Roberto Quito de San t' Anne 6 Engenheiro 
de Telecomunicagbes, formedo pelo Instituto 
Militar de Engenharia. Professor da cadeira de 
Informa'tica da Academia Militar das Agulhas 
Negras, desde agosto de 1982, 6 tambe'm co- 
laborador da MICRO-MAXI Computadores e 
Sistemas, como Analista de Sistemas. 



Nao pare seu programa 
nem perca a memoria 




Gerador Eletronico Portatil de 200 VA 




GUARDIAN 



O Gerador Eletronico GERATRON 

e a solucao definitiva para 

o problema de falha na reae 

eletrica. Quando esta faltar. 

GERATRON continuara alimeniando 

o seu micro como se nada 

houvesse acontecido. Chame 

um representante hoje mesmo. 



>y Equipamentos Eletronicos Ltda. 

ALTA TECNOLOGlA EM ELETRONICA INDUSTRIAL 

RuaDr Gamier 579 • Rocha • CEP 20971 • RJ • Tels (021) 201-0195 261-6458 e 281-3295 • Telex (021 1 34016 

• Sao Paulo (01 II 270-3175 e 241-751 1 • Brasilia (061 1 226-0133 • Salvador (071) 241-2755* Recite (081 1 221-0142 

i Natal (084) 222-3212 • Belem (091 1 222-5122 • Fortaleza (0851 226-0871 • Cuntiba (041 > 224-5616 

Flonanopolis (0482) 23-0491 • Blumenau (0473) 22-6277 • Porto Alegre (0512) 22-5061 
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A maneira prat ica de planejar, acompanhar e revisar a operacao da 
sua empresa a at raves do uso do BUSINESS-CALC. 

O BUSINESS-CALC a um produto que permite ao empresario en- 
contrar solucoes rapidas para seu problema de processamento 
da dados; com f lexlbilidade e simplicidade; com baixo custo; total 
dommio do usuario sobre o processo de calculo, prescindindo-se 
de qualquer conhecimento especif ico de computador a processa- 
mento de dados. 

O que e o BUSINESS-CALC? E um produto composto de um soft- 
ware e uma documentacao. 

SOFTWARE: Matriz eletronica de 254 linhas a 78 colunas progra- 
maveis diretamente pelo usuario, MATRIZ BUSINESS-CALC. 

REQUISITOS DO COMPUTADOR 
Sistema Operacional: SOM ou CPM 
Memoria minima: 32K 
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COMPUTEL - COMPUTADORES E 
TELECOMUNICACOES LTDA. 
AV. RIO BRANCO, 45/811 • RIO DE JANEIRO ■ 20090 
TEL: 283-1814 



com put el • compute! - computel -compute! -compute! - computel • computel 



A comunidade de Informa'tica se reune e discute os problemas do setor de software 
em busca de solucoes adequadas ao seu desenvolvimento e protecao. 



O software no Brasil 







incentivo ao desenvolvimento 
de software e a proteca"o contra 
a pirataria.Forma9ao profissio- 
nal e capatitacSo tecnoldgica. As difi- 
ceis relacOes entre software-houses e fa- 
bricantes de hardware. A discussao des- 
ses temas, entre outros, movimentou, no 
initio de julho, no Rio de Janeiro, ex- 
pressivas figuras da comunidade brasi- 
leira de Informa'tica - professores, te"c- 
nicos, empresanos e autoridades - que 
participaram do seminano Software 
no Brasil, promovido pela SEI e PUC- 
RJ. 

Apesar de n§o haver chegado a solu- 
cOes conclusivas, com a apresentacio de 
propostas concretas (como era desejo do 
Secretario Executivo da SEI, Edson 
Dytz), o seminario deixou um saldo bas- 
tante positivo, pelo ni'vel e extensa*o dos 
debates. Essa foi a opini3o do Secretario 
de Informitica, Joubert Brizida, que em 
sua fala no encerramento do encontro 
ressaJtou a "extraordinaria resposta da 
comunidade, com o que existe de me- 
lhor no setor". Brizida reconheceu a 
complexidade do tema, cujo estudo exi- 
ge, segundo ele, a "decomposicfo por 
itens", e anuntiou mais uma iniciativa 
da SEI em apoio ao setor de software: a 
constituica"o de um conjunto de bases de 
dados relativas ao setor. O pnmeiro pas- 
so nesse sentido foi a assinatura com o 
Serpro, na ocasiSo do encerramento do 
semindrio, de um convemo que vai co- 
locar no sistema de informaooes Aruan- 
da - acessivel de qualquer ponto do 



pais. via telex - um cadastro do soft- 
ware registrado na SEI. Postenormente, 
o Aruanda incluird tamb^m um cadas- 
tro de hardware e outras informaooes 
de domi'nio publico sobre a area de In- 
forma'tica. 

ASSUNTOS DEBATIDOS 

seminario foi composto por sete 
sessoes, constituidas de palestras e pai- 
ndis. No painel sobre Educaedo para De- 
senvolvimento de Software, organ izado 
pela Sotiedade Brasileira de Computa- 
cfo - SBC, Luiz Carlos Carvalho, da 
SPL, chamou a atencao para a necessi- 
dade de uma boa especificacao previa 
dos problemas a serem resolvidos pelos 
sistemas de Informa'tica e lamentou a di- 
ficuldade que os profissionais brasileiros 
tern para compreender o problema do 
usuario que, na sua opinia"o, quer "a 
informacSo e n5o a computacaV. Ele 
enfatizou am da que, em termos de tec- 
nologia, "o Brasil tern que procurar ca- 
minhos alternatives" mais de acordo 
com a sua realidade. 

Mano Gafan, da Scopus, enumerou as 
deficientias encontradas por sua empre- 
sa na area de recursos humanos: forma- 
cao inadequada; despreparo para traba- 
lhar em equipe (o que atrapalha a disse- 
mrna9ao do conheamento individual); a 
dicotomia entre o engenheiro de hard- 
ware que n5o conhece software e vice- 
versa; o desconhetimento das metodo- 
logias de desenvolvimento e a conse- 
quente resistentia a elas. 



Arthur Joa*o Catto, professor da 
Universidade Federal de Sa"o Carlos, 
rebateu acusacoes normalmente feitas 
pela industria de que os reoSm-formados 
n3o correspondem as suas necessidades. 
Ele explicou que a universidade tern 
uma gama muito ampla de aphcacdes a 
cobrir e, se concentrar a formacSo dos 
seus alunos num segmento especifico, 
podera' gerar desempregados em poten- 
tial. Ademais, acrescentou, a formacSo 
do te'enico compreende na"o s6 o estudo, 
mas a viventia profissional, tambCm. E 
nesse particular, "a industria ainda na"o 
deu a universidade a motivacSo de um 
trabalho se'rio". Catto reconheceu, con- 
tudo, que "a universidade glorifica o 
comportamento academico" e apontou 
os riscos dessa atitude argumentando 
que "se o professor n5o esta habituado 
ao trabalho real, ele na"o vai saber 
transmitir esse tipo de conhetimento 
aos alunos". 

Entre as intervencOes havidas duran- 
te o debate, Sergio Felipe, da UFRGS, 
lembrou que muitas universidades brasi- 
leiras nao dispOem de micros nacionais 
para formar pessoal, ale"m do que o ni'- 
vel de finantiamento dado pelo governo 
e pela industria as universidades para 
pesquisa i pequeno. Um tdcnico do 
Instituto de Pesquisas Tecnologicas do 
Estado de Sfo Paulo - IPT, fez outra 
coloca9^o relevante, referente ao "pes- 
soal de Informatica que nao entende de 
aplicacSo e o pessoal de aplicaca"o que 
n§o entende de Informa'tica". Para 
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contornar essa dificuldade, ponderou 
ele, 6 preciso dar uma formacSo maior 
de computacSo ao pessoal de aphcaca"o. 
J& o Vice-Reitor da PUC, prof. Car- 
los Jose" Pereira de Lucena,observou que t 
preciso dotar as equipes tdcnicas de uma 
capaadade gerencial maior, enquanto 
que Luiz Martins, presidente da SBC, 
enfatizou a necessidade de as empresas 
proporcionarem melhores estagios aos 
estudantes universitarios. 

PROTECAO AO SOFTWARE 

Em materia de legislacSo para pro- 
teger a autona de software, conforme 
disse Luiz Olavo Batista, advogado es- 
pecializado em Direito Comercial e estu- 
dioso do problema, as dificuldades de se 
defmir a propriedade do software e de 
se implementar a sua protecao sao mui- 
tas e, dentre as diversas formas ja suge- 
ridas - no Brasil e em outros paises - 
para solucionar o problema, nenhuma 
delas atende de maneira completa- 
mente satisfat6ria aos seus objetivos. 

Ja se sugeriu, por exemplo, disse ele, 
enquadrar o software como proprie- 
dade intelectual do autor, como as com- 
posicOes de musica e os livros. Dois obs- 
ticulos, no entanto, opuseram-se a essa 
ide*ia: o soft 6 geralmente desenvolvido 
em equipes e, ao contrano das obras de 
arte, que nao podem ser modificadas, o 
software necessita de constante aper- 
feicoamento, distanciando-se gradativa- 
mente da versao original. Tambe'm ja se 
pensou em tratar o soft de maneira se- 
melhante aos projetos de arquitetura, 
mas a exemplo da copia de uma casa, o 
programa copiado e diflcil de localizar 
e, se sofrer alguma modificacSo, n3o se- 
ra nada fdcil provar que se trata de uma 
copia. 

Outra questSo bastante controversa 
refere-se ao enquadramento do soft co- 
mo patente ou direito de autor. A pa- 
tente protege a idlia original, enquanto 
que o direito de autor protege a forma 
como essa id£ia se expressa, como no ca- 
so do estilo de um romancista. Ai vem a 
diivida: o que se deve proteger preferen- 
cialmente no software : a ide"ia em que se 
baseia o programa ou a forma na qual 
ele i construido? As respostas dadas pe- 
los tdcnicos divergem muito, comentou 
Olavo. No caso especi'fico da patente, 
conforme i aplicada aos produtos in- 
dustrials, ha mais um problema: o autor 
do software tena que publicar tudo a 
respeito do programa (listagem inclusa), 
o que tana a alegria dos piratas e, mais 
uma vez, pequenas vanarjoes em tomo 
da ideia onginal tomanam bastante 
complicado coibrr o trabalho dos copis- 
tas. 

Ao nivel internacional, a regulamen- 
tacSo do software tambe'm nao esta fa- 
cil, expbcou Olavo. Enquanto os pai- 
ses grandes produtores demon st ram to- 
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do o interesse em regulamentar a ma- 
teria, os pequenos produtores na"o fa- 
zem a minima questSO, uma vez que isso 
representaria para eles uma enorme eva- 
sao de divisas. 

A criacfo no Brasil de um regime ju- 
ridico adequado a pfotecSo do soft- 
ware, conclui Olavo, 6 um problema 
fundamentalmente politico dentro do 
qual o pais, "sem esquecer as relacOes 
com o resto do mundo", deve levar em 
conta preferenaalmente os interesses da 
comunidade como um todo. No piano 
especi'fico da operacionalizacSo desse 
regime jun'dico, Olavo propos a criacSo 
de um sistema hibrido entre o direito de 
autor e o direito de patentes. 

A QUESTAO DO FOMENTO 

Amda a respeito da protecSo ao soft- 
ware, diversas sugestoes pr&icas surgi- 
ram durante o painel Medidas de Prote- 
cao a Industrie National de Programa- 
qdo, organizado pela Assespro, desta- 
cando-se a concessfo de incentivos fis- 
cais para quern comprasse os programas 
dos seus legitimos autores. 

A melhor proteclo que se pode dar 
ao software nacional, no entanto, na 
opiniao de Luis Carlos Siqueira, da 
SCI, 6 fomentar o desenvolvimento 
do setor, pois a producSo brasileira ain- 
da e pequena e "nSo adianta proteger 
uma safra que n3o existe". Enfatizando 
que "devemos investir nos mercados de 
mims e micros, que sa"o o forte do hard- 
ware existente no Brasil'' Siqueira disse 
que o governo devena financial- o de- 
senvolvimento (somente para software- 
houses) sob a forma de contrato de nsco 
baseado num percentual de vendas, sem 
exigir garantias reais (pois essas empre- 
sas n5o tern como oferece-las). Outra 
maneira de incentivar o setor seria for- 
necer aos usuanos financiamentos para a 
aquisicao de software. 

Quanto ao relacionamento entre os 
fabneantes de hardware e as casas de 
programas, diversas foram as queixas e 
sugestoes apresentadas. Uma das prin- 
apais reclamacOes surgidas referiu-se a 
vinculac3o do software ao hardware na 
venda de equipamentos pelos fabnean- 
tes. Essa pr^tica, verticalizante e preju- 
dicial ao setor de software, con cordaram 
os empresirios presentes, deve ser evita- 
da. Ralf Hanning, da Simicron, insistiu 
que "o fabricante deve abrir as informa- 
c6es sobre os seus sistemas, e nlo escon- 
de-las". Ele citou como exemplo o caso 
do sistema operacional SOM, que a Co- 
bra nao divulgou e, em consequencia, o 
mercado adotou o sistema operacional 
norte-americano CP/M. _ 

a 



Tex to: Ricardo Inojosa 
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MICROS 
ESTAO Ai! 
APRENDA A 
PROGRAMA-LOS 




Se voce deseia aprender a program n mi- 
crocomputaaores, esta e a sua chance! 
Sim, porque a SULLIVAN Microcomputa- 
dores, especializada em cursos prohssio- 
nalizantes desde 1973, tern o que ha de 
melhor e mais atualizado para fazer de 
voce, em pout o tempo, um profissional 
lotalmente capacitado a operar micro- 
computadores. 

V i-jd nossos cursos, por freqiiencia ou 
correspondents: 



Basico de Eletrdnica Digital 
Basico para Microcomputadores 
Mkro-processador 8080 e auxilia- 
res 

Micro-processadores Z-80 
Integrado, englobando 3 dos cur- 
sos acima 

Linguagem BASIC especifico para 
Microcomputadores 



Nao ha misterio. E est olher e aprender. 

SULLIVAN 
MICROCOMPUTADORES LTDA. 

/R. Siqueira Campos, 43 - Cr. 703 
CEP 22031 - Rio - RJ. 
Plantao telefonico 24 hs. 
Tel.: (021) 295-0169 



, 
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CORSARIO 



Para qualqurr lipo de Microcom- 
puuidor 

• Venda 

• lnstalat:ao 

• Adapiat^o 

• Manutent^o 



Tel. (020 248-8290 
CtiLxu Postal 33. 121 - Rio 



CURSO BASIC 



Turmascom lOalunos 

Aulas praticas e tebricas 

Horarios: manha8:30hsas 10:30 hs 
tardel 4:00 hs as 1 6:00 hs 
noite 20:00 hs as 22:00 hs 
MATRiCULAS ABERTAS 

kPADEiTlA miCflO 

Rua Vise, de PirajA, 540 Ij 106 - 
22.410 Ipanema Rio RJ 
Tel. 259-1516 



m.S. Services 



O Fuluro do Homem 

esta na Informalica 

Inscreva-se ja para aprender 

ou aperfeicoar-se atraves da 

mais moderna metodologia 

— IPD (Intr. ao Proc. de Da- 
dos 

— Programacao Basic 

— CP/M (Sist. Oper. p/Mi- 
crocomputador 

— Programacao Cobol 

— Projeto/ Programacao es- 
truturada 

— Curso de micro especial 
p/crianca 

jEPD 

Processamenlo d> Dados c 
SislemaN de Informalica 
Uda. 

Computador prdprio, Turma: 
Manha.tardeenoite 

Rua Constanfa Barbosa, 188 

Solas 403/8/9 
Tel.: 593-4248 ■ Meier - RJ. 



Em Agosto 

T E L E V i D E (*) 

Lojao de Informatica mais des- 
complicadodopais! 

Micros. perifericos, suprimentos, 
Software, Cursos, Livrose Revistas. 



PRECOS ESPECIAIS. 
FINANCIAMENTO PR6PRI0. 



Compre pessoalmente ou pelo 
Reembolso: 

TELEVIDEO LTDA. 

R. Marques de Herval, 157 

Tel.: (081) 224-8932, 

RECIFE, PE. 



(') Sr. Industrial: distribuimos s/ 
produto nas melhores condi 
coes: contatos em S. Paulo (011) 
2235480. 



MICROIDEIA 



SOFTWARE P/TK 12 C - TK-tt - CP 200 

Cms*)* Pr*eo'ORTN 

— Control* 0* esloqu* 4 

— Cont»s a p*Q»rfr*C*b*r 

- fiu«o d* c»r«» 4 

- Mala dir.U 4 

- C»d**tro d* elMmt** 4 

- Proc**t*dor d* t*»*o* 

- Control* banctrio 

- ContabHkted* donvatltca 

- Ag*nda I*l*l6nic« 
-Frtotaca 

- Orc*m*nto dom*ttlco 

- Histoorama G*r*l 

- Control* d* conlfMot 

- tmmm d* contutua e 
joaos A 1 ORTN 

- Alton Blatter Bombamtteo Cmtno Orgfcj - All 

Baoa/Cotmlc Radar Soac* ki»ad*«t 

SOFTWARE P/CP S00 
Em Disco 

- Control* d* Mloqu* • Proc*«*. d* T*«to 

- Contat • Pagar'RM*b*r Cadattro d* Cll*nt*e 



ATENOEMOS P/REEMBOLSO 
POSTAL OU AEREO 



REPRESENTANTE MICRO MOUSE 
Com Roprant.ltda R VI*cond*o*Ptraja,S47 
sf307 Ipanmi Cap 22 410 Tel 294 6248 ou 
air av* s da MICROIDEIA A» Marachal Camera. 
160/1 .426 Catt*lo - Rio Cap. 20.020 R*c*do* 
p*io BIP JB9 C*ntral 246 4180 



GANHE DINHEIRO 

EXTRA 
COM O SEU MICRO 

Um Manual atualfssimo e de 
imediata aplicac;ao pratica. 

COMPRE AGORA! 

Ao reccber seu exemplar, nu- 
merado. voce estara concorren- 
do a um TK-85 e associando-se 
gratultamente ao ALFABIT 
Clube de Computa^ao. 

Pre^o de laix&mento: Cr$ 

3.850.00 em cheque nominal, 
de sua pr6pria conta bancaria 
para : 

LUCIANO FONSECA 

- Consultoria de InfoMarketing 
Cx. Postal 1914 - Tel: (081) 
224-3100 - R. da Praia. 76 - 
S/506. RECIFE. PE 



a bits & Bins 

Computadores 










Est. da Gavea, 642 Lj B Sao 
Conrado - RJ - Tel.: 322-1912 




NOCLEO 06 ENSINO 
DE TECNOLOGU E CkSNCIA LTDA. 



HtTC — I vtrnptmim da COHTBiBum m* e atertticjte- 
■M • a aspeueWacie preessewia lecnolooti arms de 
M carta Decent! ejraue* par Quaeres • Means em Uwn 
t Ct|ieJiaris tanc* para a seguiKlo ttmaart de 13 at ee- 
giaMit curat: 



Siaemas de Camumcacgas per tbras Opticas 

Hardware da Taltprocassamamo 

Satwart da Tai u ie m iMMMi 

Carntdaaarit • Mc m eni nd ieerea 0>«aat Hardware 

Memories I - Montlttas 

Hardware to kfcereprecesseder 8060/85 

Mardwirt da MKroprKtssadtr Z-80 

Mertacaamame t eerrtericas de MP 8085 

MerlaceamaMe t parilericas de MP IK 

Bateiwa Cagaa I - Camtataca»* 

Batrtiwa Ogia II - S**ue*cul 

AtipMcatirtt Otaracwun I e II 

kiarameMacae a Cantrale I 



fernecemes cam sanadada e cempetencii 
t KNOW-HOW ova VOCE precuri' 



tonka ctnkecar nessei laboraoras aitorm 
a •tscrtvtr se a 811a ahiare *»■■. 37/2* 
Centra (Em Iranti a eaicao cioaindu Metre 
U - V 1 6" das 16 00 hs as 22 00 
Saeeees das 08 00 kt asUOOks 




FORMULARIOS 

CONTINUOS 

GRANDE PR0M0CA0 

80 E 132 COLUNAS 

A VISTA OU A PRAZO 

PRONTA ENTREGA 

NO GRANDE RIO 

REEMBOLSO POSTAL 

PARA 

OUTROS ESTADOS 

ORepresentante 
Credenciado 

diSfTiQC (Micro Computadoros) 

3» Dt «3ors COMERCD E fl55E55QRifl 

Rua Conda de Bonfim, 344/406 
Bl. 1 • Tlluca • RJ • Cap 20520 ■ 
Tel.: (021) 234-3945 C.P. 24117. 



ra. 



CPTfl 5DLUTIDW 

Que tal conversar com 

profissionais de Informdtica 

para resolver o seu 

problema? 

Visite-nos 

A solucao adequada voce 

encontrard aqui. 

Desde cursos de alto nivel 

para iniciantes e 

profissionais, 

microcomputadores, 

software, 

assistencia e assessoria 

tecnicas ate o suprimentos 

adequado. 

Av. Euzebio Matoso, 654 — 

Tel. 813-3350 — SP — 

cep. 05.423 



■B 

Assistencia Eletronica Ltda. 

****** 



Rua da Lapa. 107 - 1° and. 
Tels.: 222-7137 e 222-2278 
Rio - RJ. 



HS 

Computadores e 
SistemasLtda. 

Revendedor BRASCOM 
Microcomputador BR1000M: 
Nasce e brilha em sua empresa, 
crescendo com ela ao sucesso. 
De1a6terminaisMULTIUSUA- 

RIO. De 2,4 a 384 Mb em dis- 
cos. Impressoras de 100 CpS a 
600 Lpm. 

SOFTWARE: Contabilidade, Ad- 
ministracao de Pessoal. 
VENDA E RESERVA DE INGRESSOS 
Contasareceber/Pagar 

OPEN MARKET 

Faturamentoeoutros. 

Rua das Marrecas, 25 S/ 100 1 

Tel.: 262-0697 - ligue HS 

Rio de Janeiro - RJ 




Ingles para computacao. 

Aprenda ingles com textos e exercicios 

sobre PD. Voce dominara a 

terminologia de computacao. Informe-se. 

Alameda Casa Branca, 1218 

(esquina com Rua Estados Unidos) 

Tels : 852- 1 493 e 88 1-8 148 




Curso de Basic para microcomputadores. 



A MICROSHOP 
ENTENDE. 



Ainda bem que existe a Microshop. 

Ela e a unicaloj a de computadores onde voce e orientado 
por gente f ormada em Computer Science na Universidade de 
Nova York. 

E a unica loja que desenvolve software para a aplicacao que 
voce precisar. E como ela entende profundamente de 
microcomputadores e software, tern 
a sua disposicao o que de melhor 
existe no Pais. 

Faca uma visita a Microshop. 

Ela entende ate das melhores 
condicoes de preco e pagamento 
para voce levar urn microcompu- 
tadorCipII UnitfOn versao 
nacionalizada do f amoso Apple, com 
48k bytes. 

ICfO 





op 

micros 



Alojados 

inteligentes. 



Al . Lorena, 652 

SSo Paulo -SP 

Tels.: (Oil) 282-2105 e 852-5603 




Um programa que guarda as posigdes, nomes e tamanhos dos seus programas 
em fita magne'tica certamente vai facilitar sua vida. 



Organize melhor seus 
programas em fita 



Newton Braga Junior 



D~| esenvolvido no DGT-100, o programa Diretono que 
apresentamos a seguir visa facilitar o manuseio de 
programas em fita magne'tica, separando os escntos 

em BASIC dos escntos em linguagem de maquina 6u Assembler. 
Para cada tipo de programa foi feita uma fita: na fita 
CLOAD estao armazenados os programas em BASIC e,na fita 
SYSTEM, os que estiverem em linguagem de maquina. A finali- 
dade do Diret6rio, portm, 6 apenas guardar posicOes, nomes e 
tamanhos. Ele na"o se encarrega de procurar por um determi- 
nado programa que esteja na fita - serve apenas como refe- 
renda. 

Os comandos sao faceis: 

F - Adianta a listagem (pressionando a tecla F, voce faz com 
que o programa posicione.de 8 em 8, a listagem dos programas 
contidos na fita. Esta listagem se constitui do nome, posicao e 
tamanho em Kbytes). 

T - Retrocede a listagem (mantem as mesmas caracteri'sticas 
que o comando F, mas em sentido contrario). 

P - Entra o niimero do programa (ao fazer a bstagem, voce es- 
colhe qual o programa a ser carregado, pressiona P e entra com 
o respectivo niimero. Feito isto, a tela se apresentara como na 
figura 1). 



PROGRAMA = nnnn 
POSICAO = xxxx 



P0SICI0NE A FITA NA P0SIQA0 xl ( x2 ) . OK ? 



Figura 1 
74 



Observe que nnnn 6 o nome do programa e xxxx e a sua 
exata posica"o, que € igual a xl ; x2 e a posicao recomendada. A 
diferenca entre xl e x2 atua como margem de seguranca, pre- 
venindo uma possivel falha na pretisSo do contador de voltas 
do cassete. £ recomendavel, portanto, que se posicione a fita a 
1 1/2 antes da posicao exata. 

S — No modo de bstagem, termina a execucSo do programa Di- 
ret6no. No modo de carregar, aciona o cassete. 

N - Termina o modo de carregar, voltando o controle para a 
listagem. 

A listagem i em modo continuo, ou seja, se voce ficar pres- 
sionando a tecla F, a bstagem serd feita de 8 em 8 programas 
(de 1 a 8, de 9 a 1 6, de 1 7 a 24, de 1 a 8...). mesmo aconte- 
ce se voce pressionar a tecla T, mas de modo in verso, em sen- 
tido contrano. 

Os comandos DATA das bnhas 15, 20 e 25 armazenam os 
nomes, posicOes e tamanhos dos programas, em mimero de 8 
em cada comando. Nestas bnhas, as vanaveis de Al a Y3 de- 
verao ser substituidas pelos comandos correspondentes aos 
seus programas: 

Al - Posicao do pnmeiro programa 
A2 - Nome do primeiro programa 
A3 - Tamanho do primeiro programa 
Bl - Posicao do segundo programa 
B2 — Nome do segundo programa 
B3 - Tamanho do segundo programa 
CI - Posicflo do terceiro programa... 

O Diretdrio prev€ uma capacidade de 24 programas para 
uma fita C60. Mas este niimero € muito relativo, porque a 
quantidade de programas depende dos seus respectivos tama- 
nhos: quan to maiores forem, menos serao armazenados. 

Na linha 5, as vanaveis DD, MM e AA deverSO ser substitui- 
das pela data em que voce montar o Diretono. Para bem orga- 
nizar os seus programas, proceda da seguinte maneira: 
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1 . posicione a fita no ini'cio e deixe rodar 10 voltas; 

2. faca a gravacSo dos programas que voce deseja colocar na 
fita; 

3. poaaone a fita no ini'cio outra vez e desbgue os plugs MO- 
NITOR e REMOTE do gravador; 

4. pressione PLAY e, enquanto a fita for rodando, anote as 
poacoes dos programas; 

5. carregue ou digite o programa Diret6no; 

6. organize as bnhas 15,20 e 25; 

7. no inicio da fita, grave o programa Diretbrio. 

comentArios finais 

Para cada programa a ser gravado, antes da gravacao, exe- 
cute um NEW e CLEAR50. Depois de gravado, fa$a o calculo 
para saber o tamanho do programa: PRINT X - MEM, onde X, 
em computadores com 16 Kb, 6 15570 e em computadores 
com 48 Kb i 48338; MEM 6 a vandvel do sistema, que indica o 
quanto existe de mem6na disponi'vel. 

Normalmente, o numero de caracteres que uma lmha pode 
conter 6 256, mas a linha 300 ultrapassa este numero. Por este 
motivo, voce terd que adotar o seguinte procedimento: quando 
estiver digitando a linha 300 e chegar a NP=VAL(TU$(PN)), 
entre com a bnha e execute um EDIT300; pressione X e conti- 
nue a digitar a bnha. Assim, voce ganha mais 15 caracteres, ou 
seja, voce pode digitar mais 1 5 caracteres. 

Finalmente, sempre que voce posicionar a fita no inicio. 
nao se esque9a de zerar o contador do cassete. 



Newton Duarxe Braga Junior e" programador COBOL, FORTRAN e 
BASIC. Atualmente exerce a funpao de supervisor de vendas na loja 
Clappy, RJ. 



MICRO 
CONSORCIO 



Grupos de Microcomputadores 
Nacionais de todas as marcas 

VENDA DE 

— Microcomputadores 

— Software 

— Assistencia tecnica 



Av. Rio Branco, 156 Gr. 1.420 - Tels.: 262-8737 e 262-0786 • Rio. 

Administ ragao: Barros e Barros 
Administradora de ConsOrcios Goodway Ltda. 
aut. Rec. Federal n? 03/07/080/82 



Diretorio 



5 CLS:CLEAR1000:S1$=STRING$(63,"-") :S2$="*** 100 

DGT-100 DIRETORIO / DD. 

MM.AA / ***":PRINTS1$:PRINTS2$:PRINTS1 H° 

$:PRINT:PRINT"NUMERO", "POSigAO", "NOME";TAB( 200 

57) "Kbytes" :PRINT: J=1:K=8 

10 DIMTU$(24) ,NM$(24) ,KB$(24) :F0RI=1T024:READ 210 

TU$(I) ,NM$(I) ,KB$(I) :NEXT:GOT030 300 

15 DATA"A1" , "A2" , "A3" , "Bl" , "B2" , "B3" , "CI" , "C2 

","C3","D1 ,, ,"D2" / "D3","E1 ,, ,"E2",E3","F1"," 

F2","F3","Gl","G2","G3","Hl" / n H2","H3", 
20 DATA"I1","I2","I3","J1","J2","J3","K1","K2 

" , "K3 " , "LI " , "L2 " , "L3 " , "Ml " , "M2 " , "M3" , "Nl " , 

"N2", "N3", "01", "02", "03", "PI", "P2","P3", 
25 DATA"Q1","Q2","Q3","R1","R2","R3","S1","S2 310 

","S3","T1","T2","T3","U1","U2","U3","V1", 

"V2 " , "V3 " , "XI " , "X2 " , "X3 " , "Y 1 " , "y2 " , "Y3 " 320 

30 FORI=JTOK:PRINTI;".",TU$(I) ,NM$(I) ;TAB(57) 

KB$(I):NEXT 500 

40 A$=INKEY$ :IFA$="F"THEN100ELSEIFA$="T"THEN2 

00ELSEIFA$="P"THEN300ELSEIFA$="S"THENCLS:E 

NDELSE40 



J=J+8 :K=K+8 : IFK> 24THEN110ELSEGOSUB500 : GOT 

030 

J=l:K=8:GOSUB500:GOTO30 

J=sJ-8 :K=K-8 : IFJ< 1THEN210ELSEGOSUB500 : GOTO 

30 

J=16 :K=24>GOSUB500:GOTO30 

PRINT@960,; :INPUT"ENTRE COM O NUMERO DO P 

ROGRAMA. OK ";PN:CLS : IFPN<lORPN>24THEN300 

ELSEPRINTS1$: PRINT "PROGRAMA = ";NM$(PN):P 

RINT"POSICAO = ";TU$(PN) :PRINTS1$:PRINT@4 

48, "POSICIONE O CASSETE EM ";TU$ (PN) ; :PRI 

NT" ";:NP=VAL(TU$(PN) ) :PRINT"( ";NP-1.5;" 

) . OK?" 
A$=INKEY$:IFA$=""THEN310ELSEIFA$="S"THEN3 
2 OELSE I FA$= "N "THENRUNELSE 3 10 
CLS:PRINT@4 48, "CARREGANDO >===> ";:CLOA 
D 

FORII=384T0832STEP64:PRINT@II,STRING$(63, 
32) : NEXT II: PRINT 384,;:RETURN 



■ 
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In 




diG0Pofc 




Q 



Coloque o display de cabeca para 
baixo. Faca o disquete Wear uma 
musica de Roberto Carlos para 
a visa r que o programa f4 esta" 
carregado. Armazene quatro bytes 
em apenas um, colocando 64 Kb 
em apenas 16 Kb de RAM. 
Invente um Interpretador unico 
para as linguagens BASIC, 
COBOL, Pascal e FORTH. 
Nao e" preciso chegara extremos, 
mas se voce tern pequenas rot in as 
e programas utilita'rios realmente 
uteis tomando poeira em seus 
disquetes ou fitas cassetes, 
anted pe-se aos piratas e trate 
de divulga'-los. Envieos hoje 
mesmo para: 
REDAQAO DA MICRO 
SISTEMAS - SEQAO DICAS 
Rua Visconde Silva, 25 
BOTAFOGO-RIODE 
JANEIRO - RJ 
CEP 22281 

Desta forma sua descoberta 
podera ser util para muitos e 
muitos, ao inve's de 
desmagnetizar-se com o tempo em 
suas fitas e disquetes... 






16514 
16SV7 
16518 

16520 

16522 

16523 

16525 

16527 

16529 

16530 

16551 

16532 

16536 



2* BC 4B 

23 « 
06 I 6 
BE 21 

re 76 

28 B3 
C6 60 
77 
23 

W 
2 F4 

10 F0 

C9 



% Who 

INC HL 

3NZ 1&=* 
RET 






TK82 C 



Encha a tela com o conteudo do endereco 16514 



16514 
16515 
16518 
16519 
16521 
16523 
16524 
16526 
16528 
16531 
16532 
16533 
16534 
16536 
16538 



00 
2A 
23 
06 
0E 
7E 
FE 
28 
3A 
77 
23 
0D 
20 
10 
C9 



0C 40 

16 
21 

76 

04 
82 40 



F3 

EF 



codigo do carac. 

LD HL,(16396) 

INC HL 

LD B,22 

LD 

LD 

CP 

JR 

LD 

LD 

INC 



C,33 
A,(HL) 
118 

Z, 16532 
A, (16514) 
(HL),A 
HL 



DEC C 

JR NZ, 16523 

DJNZ 16521 

RET 



POKE 16514,21 
RAND U5R 16515 



Robson Gomes Vilela-PE 
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TK82 C 

Arquiveno video 



16514 2A 0C 40 



LD HL, (16396) 



16517 


11 


18 


79 


LD DE, 31000 


16520 


01 


19 


03 


LD BC,793 


16523 


ED 


B0 




LDIR 


16525 


C9 






RET 


16526 


21 


18 


79 


LD HL, 31000 


16529 


ED 


5B 


0C 40 


LD DE,(16396) 


16533 


01 


19 


03 


LD BC,793 


16536 


ED 


B0 




LDIR 


16538 


C9 






RET 



RAND USR 16514 - arquiv/a a imagem 
RAND USR 16526 - recupera a imagem 



Robson Gomes Vilela-PE 



Roberto^, 



O 
O 

in 

I 

Q. 
O 



Rotina para somar 



7000 
7010 
7020 
7030 
7040 
7050 
7060 
7070 
7080 
7090 
7100 
7110 
7120 
7130 



REM**************SUB DE SOMA ************************ 
REM* PI* E P2*: PARCELAS DA SOMA COM OU SEM PONTO '* 
NO MAXIMO: 14 CARACTERES INTEIROS * 

NO MAXIMO: 14 CARACTERES PRACIONARIOS ♦ 



REM* 
REM* 
REM* 
REM* 
REM* 
REM* 
REM* 
REM* 
REM* 



Rl*: RESULT ADO DA SOMA 

PI (29) ,P2(29) ,R1 (29) : VETORES AUXILIARES QUE 
DEVEM SER DIMENSIONADOS ANTERIORMENTE 



* 

* 

I, J,T,M1,N1,M2,N2: VARIAVEIS AUXILIARES * 

REM************************************************** 

for i=ni to mi: Pi(i)=o : P2(l)=0 : Rl(l)=o : next i: ri*="":t=o 

IF LEFT* (PI*, 1 >=""." THEN FOR 1=2 TO LEN(P1*): P1(16-I)=VAL (MID* (PI*, 1 , 1 ) ) : 

NEXTI:M1 = 14:N1 = 16-LEN(P1*) : GOTO 7160 
7140 FOR 1=1 TO LEN(P1*>: IF MID* (PI*, I , 1 ) =" . " THEN 7150 ELSE NEXT I 
7150 M1=13+I:N1=14:F0R J=l TO 1-1 : PI < 14+I-J) =VAL (MID* (PI*, J, 1 ) ) : NEXT J : IF I<> 

LEN(P1*) AND IOLEN(Pl*)+l THEN N1 = 15+I-LEN (PI*) : FOR J = l TO LEN(P1*)-I: PK15- 
J)=VAL(MID*(P1*, J+I, 1) ) : NEXT J 
7160 IF LEFT*(P2*, 1)=". " THEN FOR 1=2 TO LEN(P2*): P2 ( 16-1 ) =VAL ( MID* (P2*, I , 1 ) ) : 

NEXT I:M2=14:N2=16-LEN(P2*) : GOTO 7190 
7170 FOR 1=1 TO LEN(P2*)Z IF MID* (P2*, I , 1 ) =" . " THEN 7180 ELSE NEXT I 
7180 M2=13+I:N2=14:F0R J=l TO I-i:P2(14+I-J)=VAL(MID*(P2«, J, 1) ): NEXT J: 
LEN(P2*) AND I <> LEN(P2*)+1 THEN N2=15+I-LEN (P2*) : FOR J=l TO LEN(P2*)-I: 
J)=VAL(MID*(P2*, J+I, 1) ) : NEXT J 
7190 IF MKM2 THEN M1=M2 
7200 IF N1>N2 THEN N1=N2 

7210 FOR I=N1 TO Ml : Rl ( I ) =P1 ( I ) +P2 ( I ) +T: T=0: IF RKIX10 THEN NEXT I ELSE R1(I)=R 
1 (I)-10:T=l:NEXT I:IF T=l THEN Rl ( I ) =1 : M1=M1+1 

7220 IF Ml>=15 THEN FOR 1= 15 TO Ml : R1*=RIGHT* (STR* (Rl < I ) ) , 1 ) +R1*: NEXT I: 
"0" THEN Rl*="" 

7230 R1*=R1*+". ":FOR I=N1 TO 14: IF R1(I)=0 THEN NEXT I ELSE FOR J=14 TO 
-l: R1*=R1*+RIGHT*(STR*(R1 (J) ) , 1) : NEXT J 
7240 IF Rl*="." THEN R1*="0" 

7250 IF RIGHT*(R1*, 1)="." THEN Rl*= LEFT* (Rl*, LEN (Rl*) -1 ) 
7260 RETURN 



IF 
Pi 



I<> 

(15- 



IF Rl*= 



I STEP 



Marcel C. Tarrisse da Fontoura-RJ 
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VENDO 



• A Assoc iacao Amigosda Logo, 
localizada na Argentina (Salguero, 
2964 (1425), Buenos Aires) foi 
organizada pelo Prof. Hor^cio 
Reggini para estudos de "Logo, 
este potente instrumento de 
aprendizagem via computador". O 
Prof. Reggini tambSm estara" pro- 
movendo, em setembro deste ano, 
nos dias 16, 17 e 18, o I Congres- 
so Internacional de Logo, em Bue- 
nos Aires. Para maiores informa- 
coes, escreva para Lincoln Brazil e 
Sih/a, Av. Bandeirantes, 790, CEP 
86.100, Cx. Postal 173, Londrina. 
Parana*. Telefones: (0432) 22-4131 
ou 22-4132. 

• Tenho um TRS-80 Colorcom- 
puter e gostaria de entrar em con- 
tato com possuidores deste micro- 
computador para trocas de ide'ias 
e experiencias. Francisco Soares, 
Rua Alagoas, 16/408, Belo Hori- 
zonte.MG, CEP 30000. 

• Procuro pessoas interessadas 
em trocar informacoes sobre de- 
senvolvimento de programas de 
ensino de matemStica para crian- 
cas. Tratar com Sflvio Vasconce- 
los no seguinte endereco: RuaTa- 
bapuS, 266, apt. 31, SSo Paulo, 
CEP 04533 ou pelo telefone: 
(011)64-5001. 



• Gostaria de entrar em contato 
com Radio-amadores que estejam 
utiiizando micros de tecnologia 
Sinclair para decodificar CW e 
RITTY. Escrever para Renato 
Strauss (PY2-EMI), Rua Cardoso 
de Almeida, 654/32, 05013, Sao 
Paulo, SP. 

• Os Microfandticos Apple estSo 
interessados em entrar em contato 
com outros usuSrios do Apple (e 
similares compativeis nacionais), 
para intercambio de programas e 
assuntos afins. Caixa Postal 20337, 
CEP 04034, SSo Paulo, SP. 

• GRANDE CIRCUITO - Bole- 
tim de Eletrdnica e ComputacSo. 
Anuncios de trocas, compras e 
vendas. Seja socio. InformacSes 
pela Caixa Postal 28, 27200, 
Piraf, RJ. 

• Trabajho com CP-500 e gosta- 
ria de trocar software comercial 
com interessados. Tratar com Jose" 
Valter Gurgel, Av. Jovita Feitosa, 
516, Fortaleza, CE. Telefone: 
(085)243-4717. 

• Gostaria de fazer contatos 
com proprieta'rios de TK82-C e 
TK85 para futuros intercambios. 
Favor ligar para (021) 246-4180, 
Bipn? 2BK2. 



CHEGA 

DE 
PROBLEMAS 

Use Tig Loader £ 



APE N AS: CR$ 15.000,00 



TIG-LOADER possibilita: 

• a localizacao do otimo volume do gravador, 
facilitandoa operacao LOAD. 

• DUPLICARqualquer programa. mesmoaque 
les "fechados". 

• carregar (LOAD) e DUPLICAR simultanea 
mente. 

• gravar (SAVE) em 2 gravadores ao mesmo 
tempo. 

• monitorar as operacoes LOAD, SAVE ou 
DUPLICACAO atraves de fone. 

• filtrar as interferences eletricas de baixa 
frequence, que sao a causa da maioria 
dos problemas de LOAD/SAVE. 



APLICATI VOS PARA TK E CP 200 

TIG-SCREEN: vinte e sete rotinas de vi'deo. para incrementar seus programas! 
Inversao de video, moldura, arquivo de imagens, rotacio, scroll em quatro 
direcoes, etc... efeitos visuais incn'veis! Em linguagem de miquina, ocupa 
1,3Kb, ficando protegido no RAMT0P, depois e so utiliza-lo onde quizer! 
P/16K Com manual explicativo Cr$ 8.000.00 

TIG-COMP: coloque. em seus programas em BASIC, a velocidade de 

codigo de maquina. Rodeos na forma C0MPILADA! Simples de usar, 

e s6 carregar ou digitar o seu programa em BASIC e depois usar 

o TIG-COMP. Pronto! Voce tera o seu programa em linguagem de maquina em 

instantes. 

P/16K Com manual explicativo Cr$ 15.000,00 

TIG-SPEED: uma combinacao de soft e hardware, permitindo uma transferencia 
de dados micro/cassete de 4.200 bauds. Voce podera carregar ou gravar 
16 Kb em 30 segundos! Acrescenta ao micro a funcio VERIFY. Facilimo de 
operar, compoe se de cassete, interface e manual explicativo. 
P/ 1 6 e 48K Preco sob consulta. 



Envie seu pedido ♦ cheque nominal cruzado 

Prazo de entrega: 15 dias 

Precos validos ate 10/09/83 

Despesas postais inclufdas nos precos 

Atandamca tomante por carta 



F 't^'7 TIGRE COM. DE EQUIP. 91 COMPUTADORES LTDA. 
((« 0))\ Rua Correia Galvao. 224 

CEP 01547 Sao Paulo SP 



SOFTWARE 

• Vendo para IBM PC, com do- 
cumentacSo, original: Visicalc, 
Wordstar e Mailmerge. Eleonora, 
Av. Borges de Medeiros, 3.735/ 
104, tel: (021) 286-3680, RJ. 

• TK82-C, NE-Z8000, etc. Tro- 
co, compro e vendo software, di 
versos jogos. Faco qualquer negb 
cio. Andre Koch, Av. Emancipa 
cao, 402, sala 2, Tramandaf, RS 
CEP 95590. 

• Vendo ou troco programas pa 
ra o TK82-C, importados e inddi 
tos nacionais: Frogger, Crazy 
Kong, Centinpedy, Fungaloides 
Glactica... Aos interessados, tratar 
com Marcelo Rodrjgues, Rua J 
Carlos, 90, 701, Jardim Botanico 
tel.:(021) 286-4765, RJ. 

• Vendo ou troco programas pa 
ra o CP-500. Tratar com Rubens 
tel.:(011) 202-8684. SP. 

• Procuro programas da a>ea de 
estrutura (concreto armado) para 
HP-85. Favor entrar em contato 
com Roberto Sergio C. G. Martins. 
Endereco: Av. Nove de Julho, 
876, Centro, Assis, SP, CEP 
19800, Caixa Postal 100. Telefo 
ne:(0183) 22-1380. 

• Programas para HP-41C. Te- 
nho o "Users'Library" de jogos e 
procuro quern tenha o de mate- 
matica e/ou o de Eng. Solar, pois 
necessito de alguns programas 
existentes neles. Paulo Bastian 
Krouwel, Rua Antonio Salomon, 
162, CEP 37500, ItajubS, MG. 

• Vendo manual TS-1000 Sin- 
clair Computer, novo, por Cr$ 4 
mil. Tratar com Luciano. R. Ote- 
ro, Rua Saturnino de Brito, 169, 
Santos, SP. 



EQUIPAMENTOS 

• Vendo TK82-C, expansSo 
16Kb, funcSo slow, chave inver- 
sora de vfdeo, joystick, gravador 
apropriado, livros (manual e de 
programas) e fitas de jogos. Pre- 
co de Cr$ 150 mil. Tratar com 
Shirley, so mente das 12: 00 as 
15:00h de 2a. a 6a. pelo telefo- 
ne: (01 1) 262-7447. 

• Vendo uma calculadora HP- 
34C. Tratar com Marcos pelo te- 
lefone: (011) 262-4928, SSo Pau- 
lo. 

• Vendo um TK85 e um JR Sys- 
data com 16K. Despacho pelo re 
embolso ou via aerea. Preco Cr$ 
179.850,00 e Cr$ 430 mil. Tel.: 
(011) 282-6268, SSo Paulo, com 
Maria Izabel. 

• Vendo calculadora HP-41C 
por Cr$ 180 mil. Tratar com Ar- 
lindo Martins Filho: Rua Esmeral- 
dino Bandeira, 393, Aflitos, Reci- 
fe, PE, CEP 50000, tel.: (061) 
222-4925. 



• Troco um D-8002 por um CP- 
500 ou Sistema 700 da Prologica. 
Caixa Postal 7459. SSo Paulo, 
CEP 01000. 

• Troco (ou vendo) dois jogos 
eletronicos ou dois relogios por 
um CP-300 ou por um computa 
dor do seu porte. Tratar com H6- 
lio pelo tel.: (011) 299 1906 (tar- 
da e noite). 

• Vendo um computador Co- 
modore VIC 20-5 Kbytes, colori- 
do e com efeitos sonoros, que 
aceita expansSo, joystick, diskdri- 
ve, interface para cassete e vem 
com manual de instrucSo. Valor 
de Cr$ 210 mil. Tratar com Er- 
in mio pelo tel.: (0132) 36-0296. 
Rua Republica do Peru, 84, San- 
tos, SSo Paulo. 

• Vendo, em perfeito estado de 
funcionamento, uma calculadora 
HP12C. Tratar com Leon, Rua 
Prof. Oscar Pereira. 1220, apto. 
517, Porto Alegre, RS, CEP 
90000. Preco Cr$ 100 mil. 

• Vende-se impressora PC100C 
(na garantia) e varios programas 
de Engenharia Civil. Melhor ofer- 
ta. Escrever para Rua Liberalino 
Lima, 287, Vila Velha. ES. 

• Vendo microcomputador TK 
82-C, expansSo de 16K, joystick 
e alguns jogos, por Cr$ 145 mil. 
Joao Roge>io Regonatti, tel.: 
(021) 238-6978. Rio de Janeiro 

• Vendo calculadora programa- 
vel TI-59, impressora e assesso 
rios por Cr$ 200 mil. Tratar com 
Paulo Pires, Cx. Postal 6125, CEP 
13100, Campinas, SSo Paulo. 



DIVERSOS 

• Conserto seu Osborne I para 
dupla densidade. Atualiza-se 
GRAFTRAX tambem. Peter, tel.: 
(021) 393-9277, RJ. 

• Vendo livros de eletronica e 
microcomputadores em ingles, em 
estado de novos, sem uso, a pre- 
cos de capa em ddlares no cam- 
bio. SSo eles: "Z-80 - Microcom- 
puter Design Projectes", Barden, 
"Programming your Apple Com- 
puter", Editora TAB; "Program- 
ming the 6800", Motorola; "What 
Every Engineer Should Know 
about Microprocessors", Motoro- 
la; "6801 — Hardware Reference 
Manual", Motorola; "Giant hand- 
book of Eletronic Projects", TAB 
Books; "How to build remote 
control devices", Stearne TAB 
Books; "Video-tape recorders", 
Hennes; "How to build your own 
working advanced microcompu- 
ter", TAB Books; "101 Micro- 
processor Projectes", SDK-85 — 
TAB Books; "Microprocessor In- 
terfacing", Artwick, McGraw Hill. 
Enrique Humberto Hernandez 
Ferri, Rua FiacSo da Saiide, 128/ 
103, CI, SSo Paulo. Telefone: 
(01 1 ) 247-4400, ramal : 335. 
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As linhas completas de 
microcomputadores, das marcas 
de absoluta qualidade, voce 
encontra na 1 mares. E em regime 
de pronta-entrega. 
Puree e iguala outras lojas de 
computadores? Mas nao e. Para 
initio de conversa, a I mares 
implantou umafilosofia propria 
de comportamento que engloba 



uma serie de servicos: coloca 
equipamentos, softwares e 
pessoal experiente a disposicdo 
da sua clientela e da global 
orientacdo de compra do 
equipamento adequado as suas 
necessidades, atuais efuturas. 
Feita a escolha, o seu 
relacionamento com o 
microcomputador sera de 



permanente tranquilidade . 
A Imares tern um corpo de 
tecnicos de hardware e software 
altamente especializado, pronto 
a pre star plena assistencia 
tecnica e manutengao, sempre 
que necessdrio. Ede mais 
a mais, na Imares o seu micro tern 
dupla seguranca: da propria 
Imares e do fabric ante . 




Na Imares 



seu micro tern 
dupla seguranca 



microcomputacbre/ 



Aw dos Imares, 457 -Tels.: 61-094614049- CEP 04085 -Moema-SP 
Rua Dr. Renato Paes de Barros, 34 - Tels. : 881-0200/1 156 - CEP 04530 - Itaim - SP 
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Curso de 
Assembler — VII 







microprocessador Zilog Z80 possui um barramento de 
dados de 8 bits para comunicar-se com as memdnas e 
os perifdncos. Entretanto,internamente ele tern capa- 
cidade para realizar operates com 16 bits. Nesta licao vamos 
estudar as instrucOes que compoem o grupo de carga de 16 
bits, que s5o as seguintes: 

1 - Move constante de 16 bits para um par de registradores 

Formato: LD dd jin 

Operacao: Move uma constante de 16 bits para um par de 
registradores de 1 6 bits. 

Cddigo objeto: 

LD dd.nn 



OOddOOOl 

I i — I I I l i 



i I I — I — I- 



00 para dd ■ par de registradores BC 

01 para dd = par de regsi tradores DE 

10 para dd = par de registradores HL 

11 para dd = par de registradores SP 



EXEMPLO 



Descricdo: Uma constante de 16 bits nn e carregada no par 
de registradores dd, onde dd define o par de registradores BC, 
DE, HL ou SP. 



LD BC.0500H 



BC 



ObOOH 



LD HL^^ OQfjH 



I I I 1 I I r— 

OOlOOOOl 



I I — \ — I — I I I 
00000000 

I I I — I I I I 



W6 I 6 6 6 6 6 6 

i i i . i . i i 



Ciclos de Mdquina (M): 3 

States (T): 10(433) 
Flags afetadas: Nenhuma 

Como exemplo, se o par de registradores HL conte"m o valor 
1A19H, apos a execuca"o da instrucao LD HL,0293H o par de 
registradores HL contera o valor 0293H. 

2 - Move constante de 1 6 bits para o regist rador indexador IX 

Formato: LD IXjin 

Operacdo: Move uma constante de 16 bits para o registrador 
indexador LX del 6 bits. 

Cddigo objeto: 



LD IX, nn 
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EXEMPLO: 



LD IX,7*OOH 



I ' 1 r— 

10 111 



I I 



10 

—I — I — I I 







1110 1 

I 1 I I 



1 

— +— 



1 

— h- 





t 







DD 
21 

00 
7% 



Descricdo: Uma const ante nn de 1 6 bits € carregada no re- 
gistrador IX de 16 bits. O primeiro operando n em codigo de 
maquina 6 o byte de mais baixa ordem. 



ix< 



5001H 



LO IX.5001H 

Ciclos de maquina (M): 4 
States (77:14(4,4,3,3) 
Flags afetadas: Nenhuma 



Como exemplo, apos a execucao da instrucSoLD IX,4520H, 
o registrador indexador IX contera o valor 4520H. 

3 — Move con si ante de 1 6 bits par? o registrador indexador IY 

Formato: LD IY,nn 

Operacdo: Move uma constante de 16 bits para o registra- 
dor indexador IY de 1 6 bits. 

Cddigo objeto: 

LD IY.nn 



1 1 





— i — 



1110 1 

— t— I — i— *— 



1 

I I I — I— 



f.XLMPLO: 





LO IY.3C00H 




L> 


1111110 1 


-4-1 


10 1 


00000000 


00111100 

— i — i i I i — i — i — 





FD 
21 
00 
3C 



Descricdo: Uma constante nn de 16 bits t carregada no re- 
gistrador IY de 1 6 bits. O primeiro operando n em codigo de 
maquina i o byte de mais baixa ordem. 



LD IY,*21FH 



IY 



A21FH 



Ciclos de maquina (M): 4 
States (T): 14(4,4,3.3) 
Flags afetadas: Nenhuma 

Como exemplo, ap6s a execucao da instrucao LD IY,7733H, 
o registrador indexador IY contera o valor 7733H. 

4 - Move mem6ria para o par de registradores HL 

Formato: LD HL,(nn) 

Operacdo: Move dois bytes a partir da posicao de memoria 
apontada por nn para o par de registradores HL. 

Cddigo objeto: 



LD HL,(nn) 



i i i i — i— 
10 10 

* I t I I 



t I I I I 



J I ■ ■ ' 



FXEMPLO: 



LD HL,U 



00 10' 10 

i I I i I 



1110 10 

' I I — I I 



10 

I I I I I 



1 

— ♦— 



E8H) 



1 





— 4— 



1 



2A 
E8 
*1 



Descricdo: O conteudo do endereco de mem6na nn e car- 
regado no registrador L do par de registradores HL e o conteii- 
do do prbximo endereco de memona nn+1 e carregado no re- 
gistrador H do par de registradores HL. 



LD HL,(57FEH) 



M4 



(57FEH) 
(57FFH) 



Ciclos de maquina (M): 5 

States (T): 16(4,3,3,33) 

Flags afetadas: Nenhuma 

Como exemplo, se o endereco 4001 H contem 37H e o en- 
dereco 4002H contdm A1H, apos a instrucao LD HLj(4001H), 
o par de registradores HL contera A137H. 

L4j U001H) 

H4J U002H) 

5 — Move mem6ria para par de registradores 

Formato: LD dd Jnn) 

Operacdo: Move dois bytes a partir da pos^ao de mem6na 
apontada por nn para um dado par de registradores. 

Cddigo objeto: 



LD dd,(nn) 


1110 110 1 


1 d d 1 1 1 




^ " W 


4 n fc 


* ■ . r 



00 para dd 

01 para dd 

10 para dd 

11 para dd 

EXEMPLO: 



par de registradores BC 

par de registradores DE 

par de registradores HL 

par de registradores SP 



LD BC,(*510H) 



1 


1 


10' 1 


1 


1 





1 


1 





1 1 








10 











1 





1 


1 



ED 
*B 
10 
15 
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Descricao: conteudo do endereco de memona nn 6 car- 
regado no registrador de baixa ordem do par de registradores 
especificados (C,E,L,SPl) e o conteudo do prdximo endereco 
de mem6na nii+1 e' carregado no registrador de alta ordem do 
par de registradores especificados (B, DJI, SPh). 



LD DE,(7000H) 



E«- 



D<* 



(7000H) 
(7001H) 



Cklos de mdquina (M): 6 

States (T): 20(4,43,33,3) 

Flags afetadas: Nenhuma 

Como exemplo, se o endereco 7000H conttfm 55H e o en- 
dereco 7001H contem FFH, apos a instrucao LD SPX7000H; 
o registrador SP de 16 bits contera FF55H. 

6 — Move mem6ria para registrador indexador DC 

Formato: LD IX, (nn) 

Operacdo: Move dois bytes a partir da posicao de memona 
apontada por nn para o registrador indexador DC de 1 6 bits. 

Cod ig o objeto: 

LD IX, (nn) 



1 1 



1 



4— h 



110 

— I — I — 



10 1 

I I 



EXEMPLO 



LD IX,(E0A3H) 



110 

l I 



1 

—I — J— 



1 1 



1 1 1 



I 1 

111 

I I 
10 







10 



DD 
2A 
A3 
EO 



Descricao: conteudo do endereco de mem6na nn e car- 
regado nos 8 bits de mais baixa ordem do registrador indexa- 
dor DC e o conteudo do proximo endereco de memona nn+1 e 
carregado nos 8 bits mais significativos do registrador indexa- 
dor DC. 



LD IX,(*300H) 



IX 4 U500H) 



IX. 



U501H) 



Cklos de mdquina (M): 6 

States (T): 20(44,333,3) 

Flags afetadas: Nenhuma 

Vejamos um exemplo. Se o endereco de memona 4000H 
contdm 91 H e o endereco 4001H contem 59H, apos a uistru- 
cSo LD DC,(4000H) o registrador DC de 1 6 bits contera 5991 H. 

7 - Move memdria para registrador indexador IY 

Formato: LD lYXnn) 

Operacdo: Move dois bytes a partir da posicSo de memona 
apontada por nn para o registrador indexador IY de 1 6 bits. 

Cddigo objeto: 



LD IY,(nn) 



EXEMPLO: 



LD 







I i i i 
1110 1 

— 1 — I I I 



10 10 

I I — I I 



H 1 1 h 



I I I I 



IY,(8*70H) 



i i i i 
1110 1 

H 1- 



10 10 

—*—\ — h— *— 



10 

I I t I 



10 



* 



FD 
2A 
70 

8<f 



Descricao: conteudo do endereco de memdna nn e car- 
regado nos 8 bits de baixa ordem do registrador indexador IY 
e o conteudo do prbximo endereco de mem6na nn+1 e carre- 
gado nos 8 bits mais significativos do registrador indexador IY. 



LD IY,(7000H) 



IY 



(7000H) 
(7001H) 



Cklos de mdquina (M): 6 

States (T): 20(4,43333) 

Flags afetadas: Nenhuma 

Um exemplo: se o enderego de mem6na 9C00H cont^m 
41H e o endereco de 9C01H contdm 40H, apos a instrucio 
LD IY,(9C00H) o registrador IY de 1 6 bits contera 4041H. 



IY L* 



IV H* 



(9C00H) 
(9C01H) 



8 - Move par de registradores HL para memoria 

Formato: LD (nn),HL 

Operacdo: Move o conteudo do par de registradores HL de 
16 bits para a mem6na a partir da posicSo indicada por nn. 

Cddigo objeto: 

LD (nn),HL 



I ! I I I i : 

10 10 

— I 1 1 M H— f— 



-♦— t- 



I I I I 



EXEMPLO: 



LD U1E8H),HL 



10 10 



11101000 

-h— I 1 h 



01000001 



22 
E8 
41 



Descricao: conteudo do registrador L do par de registra- 
dores HL 6 carregado na posicao de mem6ria nn e o conteudo 
do registrador H na pr6xima posica"o de mem6na dada por 
nn+1. 



LD (7FFFH),HL 



(7FFFH)<* L 

(8000H)«^ H 
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Na maioria dos micros pessoais, o 
usuario tem que conviver com uma 
serie de limitacoes de capacidade de 
memoria, perifericos etc. No APLY 
300 isso nao acontece. 

Para comecar, o APLY 300 e o uni- 
co micro pessoal brasileiro de sua 
classc que ja incorpora interface se- 
rial RS-232C. Isso significa que ele 
node operar com virtualmente todas 
as impressoras disponiveis no merca- 
do, alcm de coiminicar-sc com outros 
computadores. E muito breve voce 
pod era utili/ar tambem duas unida- 
des dc disqucte e gerador programa- 
vel de ate oito cores. 

Seu processador Z-80A e um dos 
mais rftptdOS cm USO no Hrasil. com 
cido de clock dc \-> MHz. Com a 
ampla mem6ria RAM de 32 ou 48 
Kbytes, voce nao precisa espremer 
sum aplicacdes, aem faxci ginastica 
na programacao. 

Mas nao e so isso que o APLY 300 
se distingue dos demais sistemas. No 
video, por exemplo. alem de funcio- 
nar com qualquer TV prcio c bran- 
co ou colorida. cic dispAc ainda de 
um conector dc SVC (Sinai dc Video 
;x>sto) para T Vs com adaptacao 
de entrada direta de video, o que per 
mite maior nitide/ de imagem. 



FIPPLY 300 



APPLY300: 

omais 
profissional 

dos micros 
pessoais. 



CARACTERI'STICAS 
TECNICAS 

• Microprocessador Z80-A 

• Linguagem Basic 

• 8 Kbytes de ROM 

• 32 ou 48 Kbytes de RAM 

• 69 teclas tipo membrana 
flexivel, com 160 f uncoes 

• Joystick, Impressora (RS 
232-C) 

• Video: Aparelhos de TV B e 
P ou Colorida • 

• Gravacao em fita cassete 
comum 

• Feedback auditivo no teclado 

• Bip programavel e com 
memoria 

• Tela para texto com 24 por 
32 caracteres alfanumericos 

• Tela para grafico com 44 por 
64 pontos graTicos 

• Teclas especiais: RUBOUT, 
EDIT, GRAPHICS, 
FUNCTION, etc 

APLICACOES 

• Programas educational*. 

• Jogos animados 




E para sua maior qualidade, a ton- 
te dc alimentacao, locali/ada no pro- 
prio corpo do aparelho, e capaz de 
fornecer tres tensoes (selecionavcis 
por chave), que poderao ser utiliza- 
das para dispositivos externos ao 
computador. 

Essas sao apenas algumas das ca- 
ractcristicas deste poderoso sistema. 
Venha ve-lo pessoalmente, voce vai fi- 
car impressionado com o desempe- 
nho do APLY 300, o mais profissio- 
nal dos micros pesados. 




MICROCOMPUTADORES 



Centro de Desenvolvimento de Sistemas 
Eletricos Ind. Com. Ltda. 
Estrada do Galeao, 1 1 - sala 202 - 
Ilha do Governador - Rio de Janeiro - RJ 
CEP 21931 -Tel.: 396-4264 




Jogos inteligentes 

Estatistica 

Calculos matematicos 

Financas 

Calculos Estruturais 

Cont role de estoque 

Controle de conta bancana 

Orgamento domestico 

Graficos 

Programacao Assembler 

E muitas outras aplicacdes 



MACROATENDIMENTO. 

DUASGR ANDES 
BSPECIALIBADES DA 

COMPUCITY. 



- > -tpndido diretamente pelos 
Analistasde Sistemas. oe monstrac6es 

Tsuas necessidades e onjament^ . hMMllgl 

Visite a Compuci^. Akm^osgan ^^^ ^ 
domercado e uma complex £ruu ^ de 

^Compucity.Oatendimentoquenaoestano 



programa. 



ConnpLicity 



Rua Tome de Souza, 882 - Savassi. Fone: 226 6336. BH - MG. 



Nao compre um microcompu tador 
que voce nao precisa. 
Consulte a Intersoft. 

Fazer uma escolha correta na hora de comprar o seu micro nao 

e nada facil. As opcoes sao muitas e variadas e o que voce 

precisa e de um microcomputador que atenda as suas 

necessidades. Nem mais. nem menos. 

F. iii que entra a Intersoft, dando toda a assessoria para voce 

fazer a melhor escolha. A Intersoft vai analisar o perfil de sua 

empresa. conhecer os seus problemas e sugerir um micro que 

lhe de as solugdes adequadas. 

Antes de comprar um microcomputador que voce nao precisa. 

consulte a Intersoft. 

SOFTWARE p/Maxxi. Unitron. Apple. Micro Engenho. CP-500. 

TRS-80. D-8000/1/2. Alfa 3000/2064. DGT-100/1. 

Desenvolvimento de Programas Especificos para todas as areas. 

APLICATIVOS: Folha de Pagamento-Contabilidade-Estoque- 

ControleBancario-Contasa Pagarea Receber-Faturamento 

Integrado - Programacao e Con t role da Producao - Mala Direta - 

Cadastro de Clientes - Cadastro de Imoveis - Controle de Onibus - 

logos. , 

UTlLITARIOS: Editor de Assembler - Compiladores Basic. 

Cpbol, Pascal e Fortran- Superscripsit- Visicalc- Magic 

Window. 

* Cursosde Basic (aulas praticas) 

* SUPRIMENTO: Disquetes - Formula rios - Fitas p/ impressoras. 

* REVENDA DE MICROCOMPUTADORES (consulte). 

INTERSOFT SISTEMAS E COMERCIO EM COMPUTACAO LTDA. 

Avenida Brigadeiro Faria Lima. 1462 - Conj. 2A 

Tels.: 211-0371/ 212-8971 -Sao Paulo- SP. 
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Ciclos de mdquina (M): 5 

States (T): 16(4333) 

Flags afetadas: Nenhuma 

Co mo exemplo, se o conteudo do par de regis tradores HL e 
483AH, apos a execucao da instruca'o LD (3000H)^L o en- 
dereco 3000H conterd o byte 3AH e o endereco 3001 H con- 
tera" o byte 48H. 

9 — Move par de reglst radores para memoria 

Formato: LD (nn),dd 

Operacdo: Move o conteudo do par de regist radores dd de 
1 6 bits para a mem6na indicada por nn. 

Codigo objeto: 

LD (nn),dd 



1110 11 

I I I 



1 d d 

— H 1 I I 1— 



n — 

-* — l — ►— . — h 



i i i i i 



1 

—H — 



1 1 



00 para dd = par de registradores BC 

01 para dd = par de registradores DE 

10 para dd = par de reg i stf adores HL 

11 para dd = par de registradores SP 
EXENPLO: 



LD U000H),BC 



1110 

I I — t— 



10 





— hH — I— 



10 

L_l I 



110 1 

— I I I — 



11 





I t I — 





— i — I — I — 



ED 
43 
00 
40 



Descricao: O conteudo do registrador de baixa ordem do 
par de registradores especificado (CJEJL^Pl) e carregado na 
posicao de memoria dada por nn e o conteudo do registrador 
de alta ordem do par de registradores especificado (B X> JN,SPh) 
e" carregado na posicao de memdria dada por nn+I . 



LD (7F01H),DE 



(7F01H)< 



(7F02HX 



Ciclos de mdquina (M): 6 

States (T): 20(4,43333) 

Flags afetadas: Nenhuma 

Como exemplo, se o par de registradores BC conte"m o mi- 
mero A675H, apos a execuca"o da instrucSo LD (lOOOH)JBC 
a posi55o de memoria 1000H contera" o byte 75H, enquanto 
46H sera" carregado na poacao 1001H. 

No prbximo niimero continuaremos com a descncao das 
instru90es que compoem o grupo de carga de 1 6 bits do Z80. 



Amaury Coma de Almeida Moraes Junior e" formado pelo curso de 
Ana'lise de Sistemas da FASP, tendo feito di versos curso s de aperfeicoa- 
mento nas ireas de Eletrdnica Digital e Microprocessadores. 
Amaury trabalha como Analista na PRODESP, na Area de mini/micro- 
computadores e presta consultoha a empresas para a implantacSo de 
sistemas de microcomputadores. 
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Suprimentos Prodata .• 
uma boa impressao do 

que foi gravado 




OFERTASPARA 
AGOSTO/SETEMBRO 



Filas para impressoras 
ELEBRA e P 720 PROLOG IC A: 

CrS 2.000.00 +18% IPI 

Fitas para impressoras 
DIG1LAB: 

CrS 3.969,00 +18% IPI 

•Fitas para cartuchos 
CENTRONICS 1 52 da Dismac: 
CrS 1.195.00 +18% IPI 



Fitas impressoras em cartucho 
para todos os Micros. Minis e 
Processadores dc Palavra. 

'Fitas largas para impressoras 
grandcslIBM. Burroughs. 
Cobra. Facom. Univac, etc.), 
em nylon e mylar. 

Fitas para impressao de 
caracteres magnet icos 
CMC-7 (Tandem-Cobra. 
H.Bull. Olivetti. Burroughs. 
MDS. etc.). 

•Diskettes de 8" e 5 1/4" 
(densidade simples e dupla). 

•Fitas magnet icas de 300/600/ 
1200/2400 pes (caixa plastica. 
tape seal e wrap around). 

Discos magneticos. 

Con fie na cxperiencia dc 
8 anos de quern fabrica 
suprimentos da mais alta 
qualidadc. 

Exija Prodata. 



O P30DACA 

PRODUTOS PARA PROCESSAMENTO DE DADOS LTDA 

Rua Henrrique Ongari, 103 CEP 05038 Sao Paulo SP Teh. 262-0896 - 864-3410 

representantes: 

Rio de Janeiro: fone 253-3481 / Belo Horizonte: /one 225-9871 

Curitiba: fone 263-3224 / Porto Alegre.fone 26-6063 / Belem: fone 223-6319 

Recife: fone 227-2969 



Ohentagao na hora da compra, seguida de um suporte pds-venda que inclui 
o treinamento e uma sirie de outros servi$os e facilidades. 



Orientacao e cartao especial 



I 



naugurado recentemente em 
Sao Paulo, o Centro Experi- 
mental de Informatica - CE1, 
da Servimec, apresenta em seu show- 
room uma vanada exposica"o de micro- 
computadores. La, os chentes recebem 
completa onentacao na escolha do equi- 
pamento e respectivo software, tendo 
ainda a possibilidade de expenmentar 
todas as maquinas expostas. 

Centro Expenmental de Informa- 
tica, segundo Antonio Barrio Jr., Dire- 
tor Supenntendente, nasceu da consta- 
taca"o feita pela Servimec de que na"o ha- 
via uma onentacao critenosa na venda 
de rrucrocomputadores e software, ade- 
quada as necessidades reais do compra- 
dor. "0 CEI pretende preencher esse 
espaco atendendo desde leigos cuno- 
sos em Informdtica ate empresas que 
procuram solucoes efetivas para as 
suas necessidades". explica. 

No Centro e encontrada uma ampla 
vanedade de equipamentos, tais como 
micros pessoais e comerciais, terminals 
de video, acessonos, supnmentos e um 
conjunto de programas selecionados pe- 
la equipe do pr6pno Centro. O CEI co- 
meraaliza produtos da Poly max. Spec- 
trum. Prologica e Digitus, entre outros. 
Ha tambe'm o servico de teleprocessa- 
mento, que interliga os computadores 
de grande porte da Servimec, em regime 
de time-shanng, a terminals ou micros 
instaJados nos escntonos dos usuanos, 
em qualquer ponto do pais. A assis- 
tencia tecnica de todos os equipamen- 
tos 6 assegurada pelos fabncantes e pe- 
lo CEl/Servimec, no propno centro. 

Para prestar maior informacao ao 
usuano, o Centro possui uma bibbote- 
ca de consulta e estudo e vende assi- 
naturas de re vistas naaonais e estrangei- 
ras, aldm de proporaonar cursos basicos 
de BASIC e COBOL. Essas aulas tam- 
be'm podem ser dadas nas instalacdes das 
empresas que solicitarem esse servico. 
Segundo Antonio Barrio Jr., 71% dos 
alunos que procuram os cursos vem por 
recomendacko de ex-alunos. "Isso 6 um 
dado muito importante para o CEI", 
afirma ele. 




No show-room do CEI os clientes tern amplo acesso aos equipamentos expostos para escolher 
o que melhor atende as suas necessidades. 



CARDWARE 

Na compra de um microcomputador 
o cbente recebe o Card ware, um carta"o 
exclusivo que proporciona uma sene de 
vantagens, tais como a preferencia de 
vaga em cursos. palestras e seminanos 
e desconto de ate" 25% em todos os 
eventos. A Servimec tambe'm envia a 
todos os seus clientes preferenciais uma 
carta mensal com todas as noticias de 
Informatica pubbcadas pela imprensa, 
aldm do calendano de todos os eventos 
que info ocorrer nos proximos 60 dias. 
Na area de software ha uma atualiza- 
ca"o constante dos programas e sempre 
que um sistema i alterado o CEI envia 
ao usuano a nova versSo. Uma outra 
possibilidade que a empresa oferece aos 
seus clientes 6 a de alugar equipamentos 
para utilizaca"o' na Servimec em horano 
reservado. 



O Diretor Supenntendente da Servi- 
mec acredita que o desenvolvimento da 
Informatica vai tomar conta cada vez 
mais do nosso dia-a-dia: "Mais cedo ou 
mais tarde vamos conviver com ela co- 
mo ja convivemos com a televisao e o 
telefone. Por isso e muito importante 
formar e informar as geracOes que ain- 
da estSo em contato com a Informati- 
ca. para que ela nao fique abenada do 
progresso da mformatizaca'o". 

CEI/Servimec tambe'm comerciali- 
za os diversos produtos pelo sistema de 
finanaamento ou leasing. O endereco 
do Centro Expenmental de Informati- 
ca 6: Rua Correa dos Santos, 34-39 
andar, Bom Retiro, Sao Paulo - SP, 
CEP01 123,tel.:(01 1) 222-151 1. ■ 



Tex to : CMudia Salles Rama/ho 
Foto: Nelson Jumo 
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NOVO CP 300 PROLOGICA. 



Opequeno 
grande micro. 

Agora, na hora de escolher entre urn 
microcomputador pessoal simples, de facil 
manejo e urn sofisticado microcomputador 
profissional, voce pode ficar com os dois. 
Porque chegou o novo CP 300 Prologica. 
novo CP 300 tern prego de 
microcomputador pequeno. Mas memdria i 
de microcomputador grande. 

Ele ja nasceu com 64 
kbytes de memdria 
^^ interna com 
possibilidade de 




Compalivel com 

programas em (ita 
cassete ou em disco. 



Pode ser 
acoplado a uma 
impressora. 




ria externa para ate 
quase 1 megabyte. 
E tern urn teclado protissional, 
que da ao CP 300 uma versatilidade incrivel. 
Ele pode ser utilizado com programas de 
tita cassete, da mesma maneira que com 
programas em disco. 



Pode ser ligado ao seuTparelho de TV, da 
mesma torma que no terminal de video 
de uma grande empresa. 
Com o CP 300 voce pode 
fazer conexdes telefonicas 
para coleta de dados, 
se utilizar 
deuma 
mpressora 

e ainda dispor de todos 
os programas existentes 
permite para o CP 500 ou o 
expansao de memo- te i™JJI? a TRS_8 ° americano. E o que e melhor: 





Pode ser ligado 
a urn televisor comum 
ou a urn sofisticado 
terminal de video. 



unico na sua faixa que ja 
nasce com 64 kbytes de memdria. 



voce estara apto a operar qualquer 
outro sistema de microcomputador. 

Nenhum outro microcomputador pessoal 
na sua faixa tern tantas possibilidades de 
expansao ou desempenho igual. 

CP 300 Prologica. 

Os outros nao mmm pRQLOGICA 

fazem que ele faZ, | S^ rrocrocomputadores 

pelo prego que ■■■ 

ele CObra. S &" »v EngU.s Carlos Bernn, U68-SP 







AM 
Manaus 234-1045 
•BA-Salvador - 247-8951 
•CE-Fortaieza - 226-0871 - 244-2448 
• DF-Brasilia - 226-1523 - 225-4534 • ES-Vila Veiha 
229-1387 - Vildtia 222-5811 •GO-Go.^nia 224-7098 -MT 
Cuiattf - 321-2307 • MS-Campo Grande - 383-1270 - Dourados 421-1052 
• MG-Belo Hofizonle - 227-0881 - Betim - 531-3806 - Cei Fabriciano - 841-3400 - Juiz 
de Fora - 212-9075 - Uberlandia - 235-1099 •PA-Belem - 228-0011 • PR-Cascavel - 23-1538 - Cun- 
liba - 224-5616 - 224-3422 Foz do Iguagu - 73-3734 - Londnna - 23-0065 • PE-Recile - 221 -0142 • Pl-Teresina 
222-0186 • RJ-Campos - 22-3714 - Rio de Janeiro - 264-5797 - 253-3395 - 252-2050 • RN-Natal - 222-3212 • RS-Caxias do 
Sui - 221-3516 - Peiotas - 22-9918 - Porto Aiegre - 22-4800 - 24-0311 - Sanla Rosa - 512-1399 •RO-Porto Velho - 221-2656 -SP 
Barretos - 22-6411 - Campmas - 2-4483 - Jundiai - 434-0222 - Mariha - 33-5099 - Mogi das Cruzes - 469-6640 - Pifacoba - 33-1470 - Ribeirao 
Prelo - 625-5926 - 635-1 195 - Sao Joaquim da Barra - 728-2472 - Sao Jose dos Campos - 22-731 1 - 22-4740 - Sao Jose do Rio Prelo - 32-2842 - Santos - 33-2230 
Sorocaba - 33-7794 • SC-Blumenau - 22-6277 - Chapeco - 22-0001 - Cnciuma - 33-2604 - Fiorian opolis - 22-9622 - Joinvile - 33-7520 • SE-Aracaiu - 224-1310 
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Caractenstlcas Tecnicas 

• Linguagem BASIC 

• 10 Kbytes de ROM. 

• 16 ou 48 Kbytes de memOria 
RAM. 

• 40 teclas e 160 funcoes. 

• Gravacao de programas em 
fita cassete comum. 

• Input e Output de dados. 

• Video: aparelhos de TV B&P 
ou c olondo 

• Funcoes especlais 
HIGHSPEED. 

• Som Opcional 

• Joystick, impressora. 

Preco de lancamento: 
Cr$ 198.850, 00(16 K) 
Cr$ 269.850. 00 (48 K) 

(Preco sujeito a alteracao) 
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REVENDEDORES: ARACAJU 224 1310 • BELEM 222 -5122/226-0518 • BELO HORIZONTE 226-6336/225 3305/22^0644/201 -7555 • BLUMENAU 22 1250 • BRASILIA 224 2777/225 -4534/226 -9201/ 
226-4327/2426344/242 5159 • BRUSQUE 55-0675 • CAMPINAS 32 381 0/8-0822/32-4 15V2 9930 • C AM PO GRANDE 383-6487/382 5332 • CARUARU 721 1273 • CUIABA 321 81 19/321 7929* CURITI- 
BA232 1750/2246467/224 3422/243 1731/223-6944/233-8572/232 1196* DIVINOPOLIS 221-2942 • FLORIAN0POLIS 23-1039 • F0RTALE2A 226 4922/231 5249/231-0577/231-7013 • FREDERICO 
WESTPHALEN 344 1 550 • GOIANIA 261 -0333/224-0557 • I JUl 332 2740 • ITAJUBA 622 2088 • LINS 22-2428 • LONORINA 22 4244/23-9674 • MACElb 223 3979/221 -6776 • MANAUS 237 1 793 • MO 
Gl DAS CRUZES 468 3779/208 -6797 • MURIARE 721 1593 • NATAL 222 3212/231-1055 • NITEROl 722^791 • NOVO HAMBURGO 93 1922/93 3800 • PELOTAS 24-5139 • PORTO ALEGRE 26-8246/ 
21-4189/24 141 1/22 3151/24-031 1/216109/24 7746* PRESIDENTE PRUDENTE 22 2788* RECIFE241-4310/224-8777/224 3436/224-4327 'RESENOE 54 1664- RIBEIRAOPRETO 636 0586/634-4715/ 
636 1 195 • RIO DE JANEIRO 267 1093/252 2050-253 3395/2644)143/259-1516/232 5948/591 3297/222-6088/267 1339/329-4869/228 2650/246-4824/239-5612/542 3849/62 8737* SALVADOR 248 6666/ 
235-4184/247 5717. SANTAMARIA 221 7120* SANTO ANDRE 455 4962/444 7375/454 9283* SANTOS 4- 1220/32 704 5/35-1792/33-2230* SAOCARLOS71-9424* SAO JOAO DA BOA VISTA22 3336 
• SAO JOSE DOS CAMPOS 22 3968/22 731 1/22 8925/21 3' 35 • SAO PAULO 853-0164/853-0448/2394122/36-6961/61 4049/881 1149/258 3954/212 9004/282 2105/212 3888/545 4769/227 3022/ 
8648200/222 1511/259 2600/2826609/813-4555/814 3663/826 1499621 3779/270-7442/210-7681/813-4O31 • SOROCABA 32 9988 • TAUBATE 31-4137 • UBERABA 333-1091 • UBERLANDIA 
234 8796 »VICOSA 891 1790/891 2258* MARILIA 33 4109 



